ULKRST

Dokumentation genererad 260909

Lib-beskrivning

Ofta använda funktioner




Innehållsförteckning


Historik

Funktion Datum Notering
lbKRST_LibExists 260908 FRLA = Tillägg SAAS
lsKRST_GetEnvironment 260908 FRLA = Funktion skapad
lbKRST_IsNumeric 260702 FRLA Justering flyttal över maxlängd för integer - för webbkrut / BS
lbKRST_GetNextLopNoEx 260624 FRLA Lyft till TV2
lbKRST_PtcStartWithShield 260624 FRLA = Lyft till TV2
lbKRST_ShowFile 260624 FRLA = Funktion skapad
lvKRST_ShowFile 260624 FRLA = Funktion skapad
lsKRST_ConvertToHTML 260317 FRLA = Radbrytning ger nu
istället för
då Pyramid kräver det för F7-texter mm
liKRST_GetLastStringPos 260303 FRLA = Funktion skapad
lsKRST_MoveUpPathLevels 260303 FRLA = Funktion skapad
lsKRST_GetPROG 260303 FRLA = Funktion skapad
lsKRST_RemoveCode 251211 FRLA Tillägg option "S"
lsKRST_AddCode 251211 FRLA Options "S" för att kunna jobba med strängar (ex nycklar från register)
lsKRST_RemoveDuplicateStringEntries 251023 FRLA = Funktion skapad
lbKRST_ReturnDocumentsInFolder 250702 FRLA = Rättning, använder nu "|" istället för "," för retur av lista
lbKRST_ClearTempFolder 250611 FRLA = Funktion skapad
lbKRST_ReturnDocumentsInFolder 250611 FRLA = Funktion skapad
lbKRST_UnpackZip 250610 FRLA = Funktion skapad
lsKRST_CreateGUIdKey 250424 ANGR = Funktion skapad
liKRST_StrBoolToInt 250422 GUST = Funktion skapad
lsKRST_IntBoolToStr 250422 GUST = Funktion skapad
lsKRST_Sigmoid 250310 FRLA = Funktion skapad
lsKRST_SigmoidPrime 250310 FRLA = Funktion skapad
lsKRST_AddLinebreaksEx 250227 FRLA = Funktion skapad
lsKRST_AddLinebreaks 250227 FRLA = Funktion skapad
lbKRST_GetDnr 250213 FRLA = Fix för egenladdade tabeller
lvKRST_LcDisableSettings 241219 FRLA = Funktion skapad
lbKRST_PtcStartWithShield 241213 FRLA = Buggfix sTimeoutSec
lbKRST_CopyData 241018 FRLA = Funktion skapad (samt TIHA, ursprungligen JOLA 2016)
lbKRST_PtcIsRunning 241011 FRLA = Hanterar nu nya ptc monitor
lbKRST_LibExists 241011 FRLA = Funktion skapad
lbKRST_RegistryExists 241011 FRLA = Funktion skapad
lbKRST_LcGetDataNumberCol 240920 FRLA = Rättad
lbKRST_GetDnr 240920 FRLA = Funktion skapad
lsKRST_GetDnr 240920 FRLA = Funktion skapad
lbKRST_PtcIsRunning 240918 FRLA = Funktion skapad
lvKRST_SelectCbRow 240829 FRLA = Kod inte längre case sensitive
lsKRST_RemoveNonLettersOrNumerical 240829 FRLA = Lagt till option för att vaska ut enbart bokstäver eller siffror och rättat en bugg
lsKRST_RemoveNonLettersOrNumerical 240701 PIMA = Funktion skapad
lsKRST_GetPrefix 240701 FRLA = Funktion skapad
lbKRST_ShowInvoice 240628 FRLA = Funktion skapad
lsKRST_Path2Unit 240627 FRLA = Fixat så funktionen är case sensitive
lsKRST_Path2Unit 240626 NIPE = Funktion skapad
lsKRST_GetDialogRoutineNo 240425 FRLA = Funktion skapad
lsKRST_GetProfileStringOrSetDefault 240425 NIPE = Funktion skapad
lvKRST_ValidateEf 240411 FRLA = Funktion skapad
lbKRST_GetRegEditPropEx 240220 MAAK = Rättning laddning register
lbKRST_SetRegEditPropEx 240220 MAAK = Rättning laddning register
lbKRST_Contains 240209 FRLA = Använder ? istället för in_string pga bugg från Unikum i vissa specifika fall
lbKRST_GetCurrentCurrencyRate 240202 MAMO = Datanummer för köpkurs ändrad




lbKRST_GetRegEditPropEx

bool lbKRST_GetRegEditPropEx(int iLuPuRegIn, str sKeyIn, ref str sProp, str sOptions, ref str sError)

Hämta Regedit-egenskap

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLuPuRegIn Reg (kan inkomma laddad för snabbare exekvering)
str sKeyIn Nyckel (KRANP\MODEXA\SMS\...värdet)
ref str sProp Värdet som ska hämtas
str sOptions Reserverad för framtida bruk
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Hämta Regedit-egenskap
Föreslagen standard:
KRPROD\[produktkod]\ (Ex. "KRPROD\EFH\")
KRANP\[Kund]\[Anpassning]\ (Ex. "KRANP\MODEXA\SMS\")



Historik

Datum Notering
181015 FIBA = Funktion skapad
240220 MAAK = Rättning laddning register



lsKRST_GetRegEditProp

str lsKRST_GetRegEditProp(str sKeyIn)

Hämta Regedit-egenskap

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sKeyIn Nyckel (KRANP\MODEXA\SMS\...värdet)

Beskrivning

Hämta Regedit-egenskap
Föreslagen standard:
KRPROD\[produktkod]\ (Ex. "KRPROD\EFH\")
KRANP\[Kund]\[Anpassning]\ (Ex. "KRANP\MODEXA\SMS\")


Historik

Datum Notering
210708 FRLA = Funktion skapad

Exempel

e:\krdocu\exempelkod\lbkrst_getregeditpropkeys-ex1.dt





function fvLoadTemplateCodes()


// Ladda om valbara mallar för aktuell importtyp


// #DOCU


begin


 str sError


 int iTemplates, iTemplate


 str sTemplatePaths, sTemplatePath


 str sTemplateCode, sTemplateName


 


 // Initera/ominitiera tabell som används för val av mall


 liDsTableCreateStart(60)     


lbDsTableCreateField(60,601,"A",25,"Mallkod") 


lbDsTableCreateField(60,602,"A",70,"Mallnamn") 


lvDsTableCreateEnd(60)         


 lbDSTable_Append(60)


 


 // Hämta upplagda mallar för importtyp


 ifl lbKRST_GetRegEditPropKeys(fsGetPropPath(),^sTemplatePaths, ^iTemplates, '',^sError)


  


  1 -> iTemplate


  while iTemplates >= iTemplate


   lsKRST_SplitStringValue(sTemplatePaths,iTemplate,"|") -> sTemplatePath


   lsKRST_GetRegEditProp(sTemplatePath&"TemplateCode") -> sTemplateCode


   lsKRST_GetRegEditProp(sTemplatePath&"TemplateName") -> sTemplateName


   ifl sTemplateName <> ""


    lbDSTable_Append(60)


    lvDSDnr_Set(60,601,sTemplateCode)


    lvDSDnr_Set(60,602,sTemplateName)


   endifl


   iTemplate+1 -> iTemplate


  wend


 else


  lvDSError("Inläsningsmallar ej registrerade")


 endifl


 


 // Visa i combobox


 lvDSLoadUnicombo(cbTemplateCode, 60)


end











lbKRST_SetRegEditPropEx

bool lbKRST_SetRegEditPropEx(int iLuPuRegIn, str sKeyIn, str sProp, str sOptions, ref str sError)

Skriva Regedit-egenskap

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLuPuRegIn Reg (kan inkomma laddad för snabbare exekvering)
str sKeyIn Nyckel (KRANP\MODEXA\SMS\...värdet)
str sProp Värdet som ska sparas
str sOptions Reserverad för framtida bruk
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Skriva Regedit-egenskap
Föreslagen standard:
KRPROD\[produktkod]\ (Ex. "KRPROD\EFH\")
KRANP\[Kund]\[Anpassning]\ (Ex. "KRANP\MODEXA\SMS\")



Historik

Datum Notering
210708 FRLA = Funktion skapad
240220 MAAK = Rättning laddning register



lvKRST_SetRegEditProp

lvKRST_SetRegEditProp(str sKeyIn, str sProp)

Skriva Regedit-egenskap

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sKeyIn Nyckel (KRANP\MODEXA\SMS\...värdet)
str sProp Värde

Beskrivning

Skriva Regedit-egenskap
Föreslagen standard:
KRPROD\[produktkod]\ (Ex. "KRPROD\EFH\")
KRANP\[Kund]\[Anpassning]\ (Ex. "KRANP\MODEXA\SMS\")


Historik

Datum Notering
210708 FRLA = Funktion skapad



liKRST_StringCount

int liKRST_StringCount(str sString, str sDelimiter)

Räknar antal delsträngar

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Sträng vars det ska räknas delsträngar i Ex. ett|två|tre
str sDelimiter Separator. Ex. "|"

Beskrivning

Räknar antal delsträngar
Identisk funktion som i ULKRUPP - liKRUPP_StringCount(str,str)
Identisk funktion som i ULKRTDD - fiKRTddHelpStringCount(str,str)


Antal delsträngar

Historik

Datum Notering
220128 FRLA = Funktion skapad
210720 FRLA = Tog bort spärr för hantering av sMarkup = " "
220312 FIBA = Verifierad och jämförd mot ULKRUPP
220518 FRLA = Buggrättning - om avgränsaren var tom fastnade funktionen i evig loop



lsKRST_SplitStringValue

str lsKRST_SplitStringValue(str sString, int iSplitPos, str sDelimiter)

Returnerar del av sträng.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Strängen ex) ett|två
int iSplitPos vilken position som ska returneras ex) 1 ger "ett" i retur
str sDelimiter Separator ex) "|"

Beskrivning

Returnerar del av sträng.
Identisk funktion som i ULKRUPP - lsKRUPP_SplitStringValue(str,int,str)
Identisk funktion som i ULKRTDD - fsKRTddHelpSplitStringValue(str,str)
OBS Notera även underliggande funktion: liKRST_StringCount


Historik

Datum Notering
220128 FRLA = Funktion skapad
220312 FIBA = Verifierad och jämförd mot KRUPP

Exempel

e:\krdocu\exempelkod\lbkrst_getregeditpropkeys-ex1.dt





function fvLoadTemplateCodes()


// Ladda om valbara mallar för aktuell importtyp


// #DOCU


begin


 str sError


 int iTemplates, iTemplate


 str sTemplatePaths, sTemplatePath


 str sTemplateCode, sTemplateName


 


 // Initera/ominitiera tabell som används för val av mall


 liDsTableCreateStart(60)     


lbDsTableCreateField(60,601,"A",25,"Mallkod") 


lbDsTableCreateField(60,602,"A",70,"Mallnamn") 


lvDsTableCreateEnd(60)         


 lbDSTable_Append(60)


 


 // Hämta upplagda mallar för importtyp


 ifl lbKRST_GetRegEditPropKeys(fsGetPropPath(),^sTemplatePaths, ^iTemplates, '',^sError)


  


  1 -> iTemplate


  while iTemplates >= iTemplate


   lsKRST_SplitStringValue(sTemplatePaths,iTemplate,"|") -> sTemplatePath


   lsKRST_GetRegEditProp(sTemplatePath&"TemplateCode") -> sTemplateCode


   lsKRST_GetRegEditProp(sTemplatePath&"TemplateName") -> sTemplateName


   ifl sTemplateName <> ""


    lbDSTable_Append(60)


    lvDSDnr_Set(60,601,sTemplateCode)


    lvDSDnr_Set(60,602,sTemplateName)


   endifl


   iTemplate+1 -> iTemplate


  wend


 else


  lvDSError("Inläsningsmallar ej registrerade")


 endifl


 


 // Visa i combobox


 lvDSLoadUnicombo(cbTemplateCode, 60)


end











lbKRST_Contains

bool lbKRST_Contains(str sString, str sValueToFind)

Kortare /mer läsbar funktion istället för in_string eller ?

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString textsträng
str sValueToFind leta-upp-sträng

Beskrivning

Kortare /mer läsbar funktion istället för in_string eller ?



Historik

Datum Notering
210708 FRLA = Funktion skapad
211115 FRLA = Hantering sValueToFind = ""
240209 FRLA = Använder ? istället för in_string pga bugg från Unikum i vissa specifika fall



lsKRST_AddCharIfMissing

str lsKRST_AddCharIfMissing(str sString, str sChar, bool bFirst)

Se till att "/" föregår i request vid API-anrop - om saknas, läggs till i början

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Textsträng
str sChar Tecken som måste finnas först eller sist i strängen
bool bFirst Om tecknet ska läggas först i strängen (annars sist)

Beskrivning

Se till att "/" föregår i request vid API-anrop - om saknas, läggs till i början


Historik

Datum Notering
210708 FRLA = Funktion skapad
211123 FRLA = Buggfix vid bFirst=false (sChar togs inte med)



lsKRST_CorrectPath

str lsKRST_CorrectPath(str sString)

Lägger till "\" efteråt om saknas (från exempelvis ini-fil, användarinställning osv)

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Sökväg

Beskrivning

Lägger till "\" efteråt om saknas (från exempelvis ini-fil, användarinställning osv)
Städar avslutande mellanslag från inargumentet
Ex) lsKRST_CorrectPath("C:") returnerar "C:\"


Historik

Datum Notering
210708 FRLA = Funktion skapad
230109 FRLA = Städar nu avslutande mellanslag från inargumentet



lbKRST_FoundInSet

bool lbKRST_FoundInSet(str sFindThis, str sInThis, str sDelimiter)

Kollar om en exakt sträng(sFindThis) finns i en del i en sträng(sInThis)

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFindThis Sträng att leta efter. Ex. "ett"
str sInThis Sträng att leta i. Ex. "ett,två,tre,fyra"
str sDelimiter Avgränsare. Ex. ","

Beskrivning

Kollar om en exakt sträng(sFindThis) finns i en del i en sträng(sInThis)
Identisk funktion som i ULKRUPP - lbKRUPP_FoundInSet(str,str,str)
OBS! Begränsning i 500 avgränsare i sträng


Historik

Datum Notering
210708 FRLA = Funktion skapad
211115 FRLA = Tagit bort intern stränglängd och trace



lbKRST_ResetUISettings

bool lbKRST_ResetUISettings(str sDialog, int iIdToolbar, str sUser, str sOptions, ref str sError)

Rensar i regedit för användarens inställningar i en toolbar

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sDialog ex "UDTEST.d"
int iIdToolbar 127 (@global kan användas om funktionen anropas i samma dialog)
str sUser Signaturen som ska städas
str sOptions Reserverad för framtida bruk
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Rensar i regedit för användarens inställningar i en toolbar
Möjlighet att kunna återställa för grupp och alla användare stödjs inte i nuläget



Historik

Datum Notering
210708 FRLA = Funktion skapad



lbKRST_CreateFolderIfNotExists

bool lbKRST_CreateFolderIfNotExists(str sFolderPathIn, str sOptions, ref str sError)

Skapar mapp om den saknas.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFolderPathIn Sökväg katalog
str sOptions Används ej fn.
ref str sError Ev fel i klartext

Beskrivning

Skapar mapp om den saknas.
Returnerar sant om mapp redan fanns eller om den lyckades skapas.
Identisk funktion i ULKRST - lbKRST_CreateFolderIfNotExists(str,str ref str)


Sant om mapp fannns eller kunde skapas

Historik

Datum Notering
210708 FRLA = Funktion skapad
220312 FIBA = Verifierad och jämförd mot ULKRUPP. Kompletterad med fler kontroller.



lsKRST_GetTimeStamp

str lsKRST_GetTimeStamp()

Sätt datum ihop till något snyggt!

Parametrar

Typ (in / by ref) Variabel Beskrivning

Beskrivning

Sätt datum ihop till något snyggt!

Historik

Datum Notering
210708 FRLA = Funktion skapad



lvKRST_SelectCbRow

lvKRST_SelectCbRow(int iId, str sCode)

Markar rad, koden ligger först, före specialtecken

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iId Kontroll id för en combobox
str sCode koden som ska markeras

Beskrivning

Markar rad, koden ligger först, före specialtecken

Comboxen förutsätts vara laddad med separatortecken 173

Historik

Datum Notering
210708 FRLA = Funktion skapad
240829 FRLA = Kod inte längre case sensitive



lbKRST_GetCurrentCurrencyRate

bool lbKRST_GetCurrentCurrencyRate(int iLuPyValutaIn, str sCurrencyCodeIn, str sOptions, ref str sCurrencyRate, ref str sError)

Hämtar valutakurs för valutakod

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLuPyValutaIn Kan skicka med global laddning för valutakoder
str sCurrencyCodeIn Valutakod
str sOptions K=Köpkurs, S=Säljkurs, B=Bankkurs
ref str sCurrencyRate Kurs i retur
ref str sError Felmeddelande i retur

Beskrivning

Hämtar valutakurs för valutakod
Kontrollerar även om valutakod existerar (och är aktiv). Tom valuta ger Systemvaluta = 1.


Historik

Datum Notering
210610 FIBA = Funktion skapad
240202 MAMO = Datanummer för köpkurs ändrad



lbKRST_DateInOpenAccountingPeriod

bool lbKRST_DateInOpenAccountingPeriod(int iLuREPERIOD, str sDate, str sOptions, ref str sError)

Kontrollerar att datumet är i en öppen period (se rutin 930)

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLuREPERIOD Kan skicka med global laddning
str sDate Datum
str sOptions Reserverad för framtida bruk
ref str sError Felmeddelande i retur

Beskrivning

Kontrollerar att datumet är i en öppen period (se rutin 930)


Historik

Datum Notering
210708 FRLA = Funktion skapad



lbKRST_CreateMailByShellExecute

bool lbKRST_CreateMailByShellExecute(str sTo, str sCC, str sSubject, str sBody, str sOptions, ref str sError)

KR System FRLA

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sTo Mottagare
str sCC Kopia
str sSubject Ämne
str sBody Text
str sOptions Reserverad
ref str sError Felmeddelande

Beskrivning

KR System FRLA
Öppnar standard epostprogram på datorn och fyller i div. fält.
Om body ska vara med, behöver sSubject finnas.
Mailto: Verkar inte ha längre stöd längre för att skicka filer.



lbKRST_GetNextLopNoEx

bool lbKRST_GetNextLopNoEx(ref str sNextLopNo, str sMainCode, str sSubCode, str sOptions, ref str sError)

Hämta nästa löpnummer i angiven nummerserie.

Parametrar

Typ (in / by ref) Variabel Beskrivning
ref str sNextLopNo Returnerar nästa nummer i serien (10 tecken som max)
str sMainCode Nummerserie (anges utan "US" som prefix)
str sSubCode Underserie
str sOptions Används ej fn.
ref str sError Felkod (om sådant finns)

Beskrivning

Hämta nästa löpnummer i angiven nummerserie.
Saknas nummerserien (sMainCode), skapas den upp automatiskt. Anges utan prefixet "US".
- KRP för Produkter
- KRA används för kundunika anpassningar.
(Kolla i 790 - Nummerserier i kundinstallation vad som är tillgänligt för KRA vid ny serie)

OBS! Fungerar enbart för egna nummerserier som börjar på US.


lbKRST_GetNextLopNoEx returnerar true om nästa nummer kan hittas.
Returnerar numret i variablen sNextLopNo by ref.

Historik

Datum Notering
210707 FIBA Funktion tillagd.
210715 FRLA Byggt in i standardlibet
211221 FIBA Korrigerat beskrivning för funktion
230125 FRLA Löpnummer som kommer i retur högerställs nu till 18 tecken
231012 FIBA Förtydligat att sMainCode ska skickas in utan US
260624 FRLA Lyft till TV2



lvKRST_SelectSetEd

lvKRST_SelectSetEd(int iId, str sNewText)

Flyttar fokus till iId (av typen "ed"), fyller i värde och kör en fire_event

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iId Kontrollid för ett textfält
str sNewText Texten som ska fyllas i

Beskrivning

Flyttar fokus till iId (av typen "ed"), fyller i värde och kör en fire_event


Historik

Datum Notering
210716 FRLA = Funktion skapad



liKRST_FoundInSetPositionEx

int liKRST_FoundInSetPositionEx(str sFindThis, str sInThis, str sDelimiter, str sOptions)

Returnerar position om en exakt sträng finns i en del i en sträng med delsträngar.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFindThis Värde att leta efter
str sInThis Sträng att leta i
str sDelimiter Avgränsare - Ex kommatecken
str sOptions "U" = Unik = Får bara förekomma en gång

Beskrivning

Returnerar position om en exakt sträng finns i en del i en sträng med delsträngar.
Returnerar -2 om värdet förekom flera gånger



Historik

Datum Notering
211110 FRLA = Funktion skapad



liKRST_FoundInSetPosition

int liKRST_FoundInSetPosition(str sFindThis, str sInThis, str sDelimiter)

Returnerar position om en exakt sträng finns i en del i en sträng med delsträngar.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFindThis Värde att leta efter
str sInThis Sträng att leta i
str sDelimiter Avgränsare - Ex kommatecken

Beskrivning

Returnerar position om en exakt sträng finns i en del i en sträng med delsträngar.



Historik

Datum Notering
211110 FRLA = Funktion skapad



lbKRST_IsNumeric

bool lbKRST_IsNumeric(str sString)

Om strängen i VERSALER är samma som gemener, är det en siffra.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Sträng med text och/eller siffror (rensa på mellanslag själv!)

Beskrivning

Om strängen i VERSALER är samma som gemener, är det en siffra.
Hanterar decimaler med punkt


Historik

Datum Notering
211110 FRLA Funktion skapad
220922 FRLA Hantering av inledande nolla
220922 FRLA Hantering av decimaler med punkt
220922 FRLA Hantering av flyttal över maxlängd för integer
260702 FRLA Justering flyttal över maxlängd för integer - för webbkrut / BS



lsKRST_ConvertToHTML

str lsKRST_ConvertToHTML(str sTextIn, str sOptions)

Ändra vanligaste konstiga tecken till html

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sTextIn Text som ska konverteras
str sOptions "R" = Radbryt undantas | "T" = Taggar (< och >) undantas

Beskrivning

Ändra vanligaste konstiga tecken till html
å,ä,ö,Å,Ä,Ö,<,>
Radbrytning (dvs CRLF) blir



html-formaterad text

Historik

Datum Notering
211019 FRLA = Funktion skapad
260317 FRLA = Radbrytning ger nu
istället för
då Pyramid kräver det för F7-texter mm



lbKRST_StartPTC

bool lbKRST_StartPTC(str sUppdragskod, ref str sError)

Startar ett PTC-uppdrag (PTC måste vara igång och aktiverat)

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sUppdragskod Ex "TVC" för uptceTVC
ref str sError Felmeddelande i retur

Beskrivning

Startar ett PTC-uppdrag (PTC måste vara igång och aktiverat)


Historik

Datum Notering
20190828 FRLA Funktion skapad



lsKRST_ReplaceStringAtPos

str lsKRST_ReplaceStringAtPos(str sString, str sNewEntry, int iChangePos, str sDelimiter)

Byter text i en viss position i en kommatecken-separerad sträng

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Strängen ex) ett|två|tre
str sNewEntry Text som ska användas istället i en viss position
int iChangePos vilken position som ska returneras (1-baserad, används position 0 kommer sträng läggas till före, används position som inte finns kommer sträng läggas till efter)
str sDelimiter Separator ex) "|"

Beskrivning

Byter text i en viss position i en kommatecken-separerad sträng



Historik

Datum Notering
211116 FRLA Funktion skapad



lsKRST_DeleteStringAtPos

str lsKRST_DeleteStringAtPos(str sString, int iPos, str sDelimiter)

Tar bort text i en viss position i en kommatecken-separerad sträng

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Strängen ex) ett|två
int iPos 1-baserad position som ska returneras ex) 1 ger "ett" i retur
str sDelimiter Separator ex) "|"

Beskrivning

Tar bort text i en viss position i en kommatecken-separerad sträng
Om en position som inte finns skickas in returneras originalsträngen
Om negativ position skickas in returneras originalsträngen



Historik

Datum Notering
211116 FRLA Funktion skapad
220525 FRLA Rättning - Första positionen raderas nu korrekt om bara ett värde
220525 FRLA Rättning - Om negativ position skickas in returneras originalsträngen



lsKRST_AddStringAfterPos

str lsKRST_AddStringAfterPos(str sString, str sNewEntry, int iPos, str sDelimiter)

Lägger till text efter en viss position i en kommatecken-separerad sträng

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Strängen ex) ett|två
str sNewEntry Text som ska läggas till
int iPos Vilken position som ska returneras ex) 1 ger "ett" i retur
str sDelimiter Separator ex) "|"

Beskrivning

Lägger till text efter en viss position i en kommatecken-separerad sträng



Historik

Datum Notering
211116 FRLA Funktion skapad



lsKRST_RemoveCode

str lsKRST_RemoveCode(str sString, str sCodeToRemove, str sDelimiter, str sOptions)

Tar bort en unik delsträng i en okänd position i en kommatecken-separerad sträng. Exempelvis för att uppdatera mailinkod

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Strängen ex) "1,2,3"
str sCodeToRemove Vad exakta delsträngen heter som ska bort ex) "2"
str sDelimiter Separator ex) ","
str sOptions "S" = Behåll full stränglängd

Beskrivning

Tar bort en unik delsträng i en okänd position i en kommatecken-separerad sträng. Exempelvis för att uppdatera mailinkod



Historik

Datum Notering
211117 FRLA Funktion skapad
220525 FRLA Rättning - rensar bort alla mellanslag från strängen och koden som ska tas bort
220525 FRLA Tillägg - rensar nu även bort flera förekomster av samma kod
220920 FRLA/MAMO Rättning - buggfix vid tom delimiter
251211 FRLA Tillägg option "S"



lvKRST_GetSealInfo

lvKRST_GetSealInfo(str sSeal, ref str sSign, ref str sRoutine, ref str sDate, ref str sTime)

Delar upp ett sigill och returnerar delarna som variabler

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sSeal Sigillet som ska delas upp
ref str sSign Signatur
ref str sRoutine Dialognummer i standard
ref str sDate Datum
ref str sTime Klockslag

Beskrivning

Delar upp ett sigill och returnerar delarna som variabler




Historik

Datum Notering
211116 FRLA Funktion skapad



lsKRST_GetSealMessage

str lsKRST_GetSealMessage(str sSeal, str sLabel, str sOptions)

Ändrar en sigill-sträng till ett lite mer lättbegriplig meddelande

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sSeal Sigillet
str sLabel Text som inleder meddelandet
str sOptions "P" - Popup på skärm

Beskrivning

Ändrar en sigill-sträng till ett lite mer lättbegriplig meddelande




Historik

Datum Notering
211116 FRLA Funktion skapad
220325 FRLA Rättat beskrivning



lsKRST_CreateSeal

str lsKRST_CreateSeal(str sRoutine, str sSign, str sDate)

Funktion bygger ihop Sigillsträng enligt Pyramid standard

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sRoutine Rutinnummer i Pyramid. Om blank inparamenter, sätter #13005. Om den är tom sätter 9999.
str sSign Signatur som ska spärra, sätter #801 om saknas
str sDate (Valfri) Date(4)-format, sätter nuvarande tid om tom

Beskrivning

Funktion bygger ihop Sigillsträng enligt Pyramid standard




Historik

Datum Notering
211116 FRLA Funktion skapad



lsKRST_LcFindRows

str lsKRST_LcFindRows(int iId, int iLu, str sDnrList, str sValueList, str sOptions)

Funktion söker sträng i grid/lc och returnerar kommateckenseparerad lista över radnr över de som matchar (ex alla rader med samma ordernummer)

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iId Kontrollid på listkontroll
int iLu Ev lu. ANY_LU går bra
str sDnrList Datanummer som ska kontrolleras. Kommateckenseparerad lista över datanummer att kontrollera stödjs också.
str sValueList Värde i datanumret. Motsvarande kommateckenseparerad lista över innehåll att kontrollera i de datanummer som finns i sDnrList stödjs också.
str sOptions Reserverad för framtida bruk

Beskrivning

Funktion söker sträng i grid/lc och returnerar kommateckenseparerad lista över radnr över de som matchar (ex alla rader med samma ordernummer)





Historik

Datum Notering
211116 FRLA Funktion skapad



lsKRST_GetFileDate

str lsKRST_GetFileDate(str sFile, str sOptions)

Returnera filens senaste ändringsdatum i önskat format

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFile Filsökväg
str sOptions 8,P,L

Beskrivning

Returnera filens senaste ändringsdatum i önskat format
Vid tom option sätts utdata till ger P

P: Pyramidformat "ÅÅMMDD" (Standard vid tom option)
8: date(8)-format "ÅÅÅÅMMDD" (Motsvarar date(8))
L: Logg/långt format "ÅÅÅÅ-MM-DD" (snyggt, läsbart)


Datum i önskat format
Saknas fil returneras blankt.

Historik

Datum Notering
220115 FIBA = Funktion skapad



lsKRST_GetFileTime

str lsKRST_GetFileTime(str sFile, str sOptions)

Returnera filens senaste ändringstid i önskat format

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFile Filsökväg
str sOptions P,L,8

Beskrivning

Returnera filens senaste ändringstid i önskat format
Vid tom option sätts utdata till ger P

P: Pyramidformat "TT.MM.SS" (Standard vid tom option)
8: date(8)-format "TTMMSS" (Motsvarar date(8))
L: Loggningsformat "TT:MM:SS" (Snyggt, läsbart)


Datum i önskat format
Saknas fil returneras blankt.

Historik

Datum Notering
220115 FIBA = Funktion skapad



lsKRST_GetFileDateTime

str lsKRST_GetFileDateTime(str sFile, str sOptions)

Returnera filens senaste ändringsdatum och tidstämpel i olika format

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFile Filsökväg
str sOptions 8,L,P

Beskrivning

Returnera filens senaste ändringsdatum och tidstämpel i olika format
Funktion för ökad läsbarhet av kod
Vid tom option sätts utdata till L

P: Pyramidformat "ÅÅMMDD TT.MM.SS" (Standard vid tom option)
8: date(8)-format "ÅÅÅÅMMDDTTMMSS" (Motsvarar date(8))
L: Loggningsformat "ÅÅÅÅ-MM-DD TT.MM.SS" (Snyggt, läsbart)



Datum i valt utdataformat.
Saknas fil returneras blankt.

Historik

Datum Notering
220115 FIBA = Funktion skapad



lsKRST_GetFileSize

str lsKRST_GetFileSize(str sFile, str sBaseUnit, str sRoundBase)

Returnera filstorlek i önskad utdata

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFile Filsökväg
str sBaseUnit B,KB,MB eller GB (se notering). Tomt ger B. A returnerar storlek avrundad till närmsta enhet (ex en fil som har byte-storlek 200000 returneras som "200 kB").
str sRoundBase Avrundning (se lsDSRound på kswiki) - ex "1.000"

Beskrivning

Returnera filstorlek i önskad utdata
A: Automatisk storhet på retur
Byte: I byte
KB: I kilobyte
MB: I megabyte
GB: I gigabyte



Historik

Datum Notering
211217 FRLA = Funktion skapad
220301 FRLA = Rättning - avrundning för B och KB hanteras nu
221201 FRLA/GUST = Tidigare användes SI-enhet för KB,MB,GB - nu används KiB,MiB,GiB (dvs 1KB = 1024byte)



lbKRST_FileAccessable

bool lbKRST_FileAccessable(str sFilePath, ref str sError)

Kontrollera att filen går läsa och ändra

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFilePath Filsökväg
ref str sError Fel i retur

Beskrivning

Kontrollera att filen går läsa och ändra



Historik

Datum Notering
220117 FIBA = Funktion skapad



lbKRST_PathAccessable

bool lbKRST_PathAccessable(str sPath, ref str sError)

Kontrollera att filen går läsa och ändra

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sPath Filsökväg
ref str sError Fel i retur

Beskrivning

Kontrollera att filen går läsa och ändra



Historik

Datum Notering
220117 FIBA = Funktion skapad



lsKRST_TextFromRight

str lsKRST_TextFromRight(str sTextIn, int iLenFromRight, str sOptions)

Hämtar iLenFromRight från slutet av sText

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sTextIn Text för där data skall utvinnas ifrån
int iLenFromRight Antal tecken från slutet
str sOptions Används ej fn.

Beskrivning

Hämtar iLenFromRight från slutet av sText
Funktionen rensar inte blanksteg
Ex. sText: "Hejsan" och iLenFromRight: "3" = "san"


Historik

Datum Notering
220117 FIBA = Funktion skapad



lsKRST_ConvertSecondsToTime

str lsKRST_ConvertSecondsToTime(int iSecondsIn, str sDelimiterIn)

Retunerar en klockslagsformaterad sträng av

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iSecondsIn Inkommande antal sekunder som ska omvandlas
str sDelimiterIn För egen avgränsare (ex. '.'). Tomt ger ":"

Beskrivning

Retunerar en klockslagsformaterad sträng av
ett inkommande antal sekunder.
Utformat (hh:mm:ss). Om inte specifik Delimiter anges
Ex. 70 -> 00:01:10



Historik

Datum Notering
220117 FIBA = Funktion skapad



lbKRST_GetCustomerInvoicePath

bool lbKRST_GetCustomerInvoicePath(str sInvoiceTypeIn, str sInvoiceNoIn, ref str sDocumentPath, str sOptions, ref str sError)

Returnerar sökväg till kundfaktura. Kontrollerar även att filen finns och är åtkomstbar.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sInvoiceTypeIn Fakturatyp (Behöver ej vara justerad)
str sInvoiceNoIn Fakturanummer (Behöver ej vara justerad)
ref str sDocumentPath Retur av Sökväg (komplett UNC om servermiljö)
str sOptions Används ej fn.
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Returnerar sökväg till kundfaktura. Kontrollerar även att filen finns och är åtkomstbar.



Historik

Datum Notering
220118 FIBA = Funktion skapad
220301 FRLA = Rättning - sDocumentPath returnade sökväg utan filnamn samt tömdes inte vid start.



lbKRST_GetSupplierInvoicePath

bool lbKRST_GetSupplierInvoicePath(str sInvoiceTypeIn, str sInvoiceNoIn, ref str sDocumentPath, str sOptions, ref str sError)

Returnerar sökväg till Leverantörsfaktura. Kontrollerar även att fakturafilen finns och är åtkomstbar

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sInvoiceTypeIn Fakturatyp (Behöver ej vara justerad)
str sInvoiceNoIn Fakturanummer (Behöver ej vara justerad)
ref str sDocumentPath Retur av Sökväg (komplett UNC om servermiljö)
str sOptions B:Returnerar sökväg till bilagorna istället. Separerade med |-tecken. U: Få korrekt server-sökväg.
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Returnerar sökväg till Leverantörsfaktura. Kontrollerar även att fakturafilen finns och är åtkomstbar
Kontroll sker inte av bilagor



Historik

Datum Notering
220118 FIBA = Funktion skapad
220228 FRLA = Rättning: Låg en "\" efter filnamnet. sDocumentPath tömdes inte heller vid start.



lsKRST_AddCode

str lsKRST_AddCode(str sString, str sCodeToAdd, str sDelimiter, str sOptions)

Lägger till en unik delsträng i en okänd position i en separerad sträng om saknas.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Strängen ex) "A,B,C"
str sCodeToAdd Vad delsträngen heter som ska läggas till ex) "B"
str sDelimiter Separator ex) ","
str sOptions "S" = Behåll full stränglängd

Beskrivning

Lägger till en unik delsträng i en okänd position i en separerad sträng om saknas.
Exempelvis för att uppdatera mailinkod.
OBS: Tar bort alla mellanslag i kodsträngen om inte option används!



Historik

Datum Notering
220421 FRLA Funktion skapad
220425 FRLA Justering, blanka tecken före och efter sString och sCodeToAdd tas bort. Befintliga mellanslag sopas.
220425 FRLA Justering, ska inte börja med separatorn vid tom insträng.
220920 FRLA/MAMO Rättning - buggfix vid tom delimiter
251211 FRLA Options "S" för att kunna jobba med strängar (ex nycklar från register)



lsKRST_BubbleSortString

str lsKRST_BubbleSortString(str sListToSort, str sDelimiter, bool bAscending, str sOptions)

Sorterar sträng med bubblesort-algoritmen

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sListToSort Sträng med delsträngar i. Ex) ett|tre|två|
str sDelimiter Separator. Ex) "|"
bool bAscending Stigande ordning ("ett|två|tre") om sann, annars fallande ("tre|två|ett")
str sOptions Reserverad för framtida bruk

Beskrivning

Sorterar sträng med bubblesort-algoritmen
Sorterar med alfanumerisk jämförelse i nuläget



Wed 22-05-184 FRLA = Funktion skapad



lbKRST_GetRegEditPropKeys

bool lbKRST_GetRegEditPropKeys(str sKeyIn, ref str sPropKeys, ref int iPropKeys, str sOptions, ref str sError)

Hämta vilka regedit-egenskaper/nycklar som finns under en befintlig nyckel.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sKeyIn Nyckel (KRFS\...värdet)
ref str sPropKeys Nycklar som finns under angiven nyckel
ref int iPropKeys Antal nycklar
str sOptions A=Returnera bara nyckelvärdet, dvs inte hela nyckelsträngen
ref str sError Ev. fel

Beskrivning

Hämta vilka regedit-egenskaper/nycklar som finns under en befintlig nyckel.

Exempel. För nyckeln KRAP_ORDERTYPE\ finns undernycklarna "KRAP_ORDERTYPE\VOLVO\" samt "KRAP_ORDERTYPE\SAAB\"
Funktionen returnerar då (i sPropKeys):
"KRAP_ORDERTYPE\VOLVO\|KRAP_ORDERTYPE\SAAB\" eller "VOLVO|SAAB" (vid options "A")

iLuPuRegIn = Reg (kan inkomma laddad för snabbare exekvering)


Historik

Datum Notering
220514 FIBA = Funktion skapad
221223 FRLA = sPropKeys och iPropKeys töms mellan varje anrop

Exempel

e:\krdocu\exempelkod\lbkrst_getregeditpropkeys-ex1.dt





function fvLoadTemplateCodes()


// Ladda om valbara mallar för aktuell importtyp


// #DOCU


begin


 str sError


 int iTemplates, iTemplate


 str sTemplatePaths, sTemplatePath


 str sTemplateCode, sTemplateName


 


 // Initera/ominitiera tabell som används för val av mall


 liDsTableCreateStart(60)     


lbDsTableCreateField(60,601,"A",25,"Mallkod") 


lbDsTableCreateField(60,602,"A",70,"Mallnamn") 


lvDsTableCreateEnd(60)         


 lbDSTable_Append(60)


 


 // Hämta upplagda mallar för importtyp


 ifl lbKRST_GetRegEditPropKeys(fsGetPropPath(),^sTemplatePaths, ^iTemplates, '',^sError)


  


  1 -> iTemplate


  while iTemplates >= iTemplate


   lsKRST_SplitStringValue(sTemplatePaths,iTemplate,"|") -> sTemplatePath


   lsKRST_GetRegEditProp(sTemplatePath&"TemplateCode") -> sTemplateCode


   lsKRST_GetRegEditProp(sTemplatePath&"TemplateName") -> sTemplateName


   ifl sTemplateName <> ""


    lbDSTable_Append(60)


    lvDSDnr_Set(60,601,sTemplateCode)


    lvDSDnr_Set(60,602,sTemplateName)


   endifl


   iTemplate+1 -> iTemplate


  wend


 else


  lvDSError("Inläsningsmallar ej registrerade")


 endifl


 


 // Visa i combobox


 lvDSLoadUnicombo(cbTemplateCode, 60)


end











lbKRST_DeleteRegEditProp

bool lbKRST_DeleteRegEditProp(str sKeyIn, str sOptions, ref str sError)

Radera en nyckel (och underliggande värden).

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sKeyIn Nyckel (KRPROD\...värdet)
str sOptions Använd ej fn.
ref str sError Ev. fel

Beskrivning

Radera en nyckel (och underliggande värden).
Nycklar för produkter ska sparas i initial mapp "KRPROD". För anpassningar "KRAP"
OBS: Använd med försiktighet så du inte raderar fel nycklar!

Exempel 1, radera en hel "mapp" och underloggande poster:
För nyckeln KRAP\ORDERTYPE\ finns undernycklarna "KRAP\ORDERTYPE\VOLVO\" samt "KRAP\ORDERTYPE\SAAB\"
Om funktion anropas med KRAP\ORDERTYPE\ raderas allt underliggande inkl "mapparna" på samma nivå.

Exempel 2, raderar specifik post:
För nyckeln KRAP\ORDERTYPE\Value1 finns ett värde i registret.
Den här nyckel kommer raderas (ingen dvs då den inte avslutas med "\" kommer funktionen inte leta efter underliggande poster.



Historik

Datum Notering
220514 FIBA = Funktion skapad



lsKRST_GetCbRowCode

str lsKRST_GetCbRowCode(int iComboBox)

Hämtar aktuell kod från kombinationsbox.

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iComboBox Kombinationsbox

Beskrivning

Hämtar aktuell kod från kombinationsbox.
Förutsätter att kod och beskrivning är separerad med CBSEP/chr(173).


Historik

Datum Notering
220528 FIBA: Funktion skapad



lvKRST_AddString

lvKRST_AddString(ref str sStringList, str sAddString, str sDelimiter)

Används för att bygga en separerad sträng

Parametrar

Typ (in / by ref) Variabel Beskrivning
ref str sStringList Sträng som ska fyllas med ytterligare argument.
str sAddString Argument som ska läggas till
str sDelimiter Separator (valfri)

Beskrivning

Används för att bygga en separerad sträng
Tar alltid med även blanka värden och bibehåller stränglängder (i motsats till lvDSAddArgument).
Kan också användas för att bygga nycklar utan separator.



Historik

Datum Notering
221025 FRLA = Funktion skapad



lbKRST_LcDataNumbersVerify

bool lbKRST_LcDataNumbersVerify(int iLc, str sDataNumbersToVerifyIn, str sOptions, ref str sError)

Kontrollera om listan med datanummer finns i listkontroll. Går att ange ett datanummer också.

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLc Listkontroll
str sDataNumbersToVerifyIn Datanummer, kommaseparerad
str sOptions Avänds ej fn.
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Kontrollera om listan med datanummer finns i listkontroll. Går att ange ett datanummer också.
Vid flera dataummer separeras dessa med kommatecken. Exempelvis: "1001,1002".
Datanummer behöver inte anges med lu före så som det ligger i listkontrollen. Ex "34.3405" räcker som "3405"



Historik

Datum Notering
221023 FIBA = Funktion skapad



lbKRST_LcGetDataNumberCol

bool lbKRST_LcGetDataNumberCol(int iLc, int iDataNumber, ref int iLcCol, str sOptions, ref str sError)

Returnerar kolumnnummer för aktuellt datanummer - med felhantering

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLc Listkontroll
int iDataNumber Datanummer
ref int iLcCol Listkontroll
str sOptions Avänds ej fn.
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Returnerar kolumnnummer för aktuellt datanummer - med felhantering
Använder lc_dnrtocol samt lc_dnr_inuse och kontrollerar inargumenten



Historik

Datum Notering
221023 FIBA = Funktion skapad
240920 FRLA = Rättad



liKRST_LcGetDataNumberCol

int liKRST_LcGetDataNumberCol(int iLc, int iDataNumber)

Returnerar kolumnnummer för aktuellt datanummer

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLc Listkontroll
int iDataNumber Datanummer

Beskrivning

Returnerar kolumnnummer för aktuellt datanummer
Bör köras efter en kontroll av datanummer i funktionen lbKRST_LcDataNumbersVerify()


Returnerar noll om datanummer saknas i listkontroll

Historik

Datum Notering
221023 FIBA = Funktion skapad



lbKRST_LcGetTextSelected

bool lbKRST_LcGetTextSelected(int iLc, int iDataNumber, ref str sDataValue, str sOptions, ref str sError)

Returnerar värde för datanummer från listkontroll från markerad rad

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLc Listkontroll
int iDataNumber Datanummer
ref str sDataValue Värde från datanummer
str sOptions Används ej för närvarande
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Returnerar värde för datanummer från listkontroll från markerad rad



Historik

Datum Notering
221023 FIBA = Funktion skapad



lsKRST_LcGetTextSelected

str lsKRST_LcGetTextSelected(int iLc, int iDataNumber)

Returnerar data för datanummer från listkontroll för markerad rad

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLc Listkontroll
int iDataNumber Datanummer

Beskrivning

Returnerar data för datanummer från listkontroll för markerad rad
Bör köras efter en kontroll av datanummer i funktionen lbKRST_LcDataNumbersVerify()
OBS Egen kontroll av att rad är markerad bör göras före ( cb_get_cursel(iId) )



Historik

Datum Notering
221023 FIBA = Funktion skapad



lbKRST_LcGetTextMulti

bool lbKRST_LcGetTextMulti(int iLc, int iDataNumber, ref str sDataList, str sOptions, ref str sError)

Returnerar en pipe-separerad lista med markerade data för angivnet datanummer.

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLc Listkontroll
int iDataNumber Datanummer
ref str sDataList Lista med nycklar, kommaseparerade
str sOptions A: Alla i listkontroll (oavsett markering)| U: Enbart unika data
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Returnerar en pipe-separerad lista med markerade data för angivnet datanummer.
Fungerar på listkontroller med enkel och flerradig markering(multiline) samt de med bockrutor (rowmarkmode =1).
För listkontroller med både multiline och bockrutor prioriteras bockrutor.
Tomma nycklar inkluderas.
Tips: För att se hur många nycklar som returnerades, kör liKRST_StringCount(sDataList, "|").



Historik

Datum Notering
221023 FIBA = Funktion skapad



lsKRST_LcGetTextMulti

str lsKRST_LcGetTextMulti(int iLc, int iDataNumber, str sOptions)

Returnerar en pipe-separerad lista med markerade data för angivnet datanummer.

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLc Listkontroll
int iDataNumber Datanummer
str sOptions A: Alla i listkontroll (oavsett markering)| U: Enbart unika data

Beskrivning

Returnerar en pipe-separerad lista med markerade data för angivnet datanummer.
Fungerar på listkontroller med enkel och flerradig markering(multiline) samt de med bockrutor (rowmarkmode =1).
För listkontroller med både multiline och bockrutor prioriteras bockrutor.
Tomma nycklar inkluderas.
Tips: För att se hur många nycklar som returnerades, kör liKRST_StringCount(sDataList, "|").


sDataList = Lista med nycklar, kommaseparerade
sError = Returnerar ev felmeddelande i klartext

Historik

Datum Notering
221023 FIBA = Funktion skapad



lsKRST_EstimatedTimeLeft

str lsKRST_EstimatedTimeLeft(str sStartTimeDate10, str sCurrentTimeDate10, int iPos, int iTotal, str sBaseUnit, str sRoundBase)

Visar en uppskattad tid kvar, bra att använda i en shield t ex. Kan ändra mellan sekunder/minuter och timmar själv.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sStartTimeDate10 Date(10) - Starttid på körning. Sträng med 10 siffror.
str sCurrentTimeDate10 Date(10) - Nuvarande tid. Sträng med 10 siffror.
int iPos Hur många cykler en körning gått
int iTotal Hur många cykler totalt i en körning
str sBaseUnit S,M,T (se notering). Tomt ger M. A returnerar storlek avrundad till närmsta enhet (ex 60 sekunder avrundas till 1 minut)
str sRoundBase Avrundning (se lsDSRound på kswiki) - ex "1.000". Tomt ger B. A returnerar storlek avrundad till närmsta enhet (ex en fil som har byte-storlek 200000 returneras som "200 kB").

Beskrivning

Visar en uppskattad tid kvar, bra att använda i en shield t ex. Kan ändra mellan sekunder/minuter och timmar själv.


Historik

Datum Notering
221128 FRLA = Funktion skapad



lsKRST_AdjustStringLength

str lsKRST_AdjustStringLength(str sString, int iLen, str sOptions)

Justera textsträng enligt en viss längd.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Text
int iLen Önskad stränglängd
str sOptions "L" för vänsterjustering, "R" för högerjustering

Beskrivning

Justera textsträng enligt en viss längd.



Historik

Datum Notering
170615 FRLA = Funktion skapad



lsKRST_AdjustStringLeft

str lsKRST_AdjustStringLeft(str sString, int iLen)

Justerar en text till önskat antal tecken. Vänsterställd text med mellanslag efteråt.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Text
int iLen Önskad stränglängd

Beskrivning

Justerar en text till önskat antal tecken. Vänsterställd text med mellanslag efteråt.
Se lsKRST_AdjustStringLength för mer information



Historik

Datum Notering
230125 FRLA = Funktion skapad



lsKRST_AdjustStringRight

str lsKRST_AdjustStringRight(str sString, int iLen)

Justerar en text till önskat antal tecken. Högerställd text med mellanslag före.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Text
int iLen Önskad stränglängd

Beskrivning

Justerar en text till önskat antal tecken. Högerställd text med mellanslag före.
Se lsKRST_AdjustStringLength för mer information


Historik

Datum Notering
230125 FRLA = Funktion skapad



lbKRST_CbVerifyCode

bool lbKRST_CbVerifyCode(int iId, str sCode)

Finns en specifik kod i en combobox?

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iId Kontroll id för en combobox
str sCode koden som ska markeras

Beskrivning

Finns en specifik kod i en combobox?

Comboxen förutsätts vara laddad med separatortecken 173

Historik

Datum Notering
230322 FRLA = Funktion skapad



lbKRST_ExistInList

bool lbKRST_ExistInList(str sOptions, str sList, str sItem, str sDelimiter)

Kontrollerar om sItem finns i en lista sList som är separerad med sDelimiter

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sOptions C - Case insensitive
str sList Sträng att leta i. Ex. "etta,två,tre,fyra"
str sItem Sträng att leta efter. Ex. "ett"
str sDelimiter Avgränsare. Ex. ","

Beskrivning

Kontrollerar om sItem finns i en lista sList som är separerad med sDelimiter
Påminner om FoundInSet men denna har inga begränsningar samt att den inte får träff på delmängder.
I exemplet nedan så skulle denna funktion tex inte få träff medan FoundInSet och ?-operatorn skulle få träff.


Historik

Datum Notering
231212 GUST = Funktion skapad



lbKRST_AddIfNotExistInList

bool lbKRST_AddIfNotExistInList(str sOptions, ref str sList, str sItem, str sDelimiter)

Lägger till sItem i sList om sItem inte finns där.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sOptions C - Case insensitive
ref str sList Sträng att leta i. Ex. "etta,två,tre,fyra"
str sItem Sträng att lägga till. Ex. "ett"
str sDelimiter Avgränsare. Ex. "," - om denna saknas kommer kommatecken användas

Beskrivning

Lägger till sItem i sList om sItem inte finns där.
Listan förutsätts vara separerad med sDelimiter
Returnerar true om sItem lagts till i listan


Historik

Datum Notering
231212 GUST = Funktion skapad



lsKRST_GetDialogRoutineNo

str lsKRST_GetDialogRoutineNo(str sDialog, str sOptions)

Vilket rutinnummer har en dialog i denna Pyramid?

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sDialog Filnamn på dialog inklusive filändelse (ex "udtest.d")
str sOptions Reserverad för framtida bruk

Beskrivning

Vilket rutinnummer har en dialog i denna Pyramid?
Returnerar sträng istället för integer ifall rutinnummer inte hittas - då blir slutresultatet snyggare än att det står "0".
Tips: Sätt titelraden i dialog med ww_textset(-3, "xxx")


Historik

Datum Notering
240425 FRLA = Funktion skapad



lsKRST_GetProfileStringOrSetDefault

str lsKRST_GetProfileStringOrSetDefault(str sSection, str sEntry, str sDefault, str sFilename)

Som en getprofilestring men den skapar Entryt med ett defaultvärde om den ej finns

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sSection Sektion
str sEntry Entry
str sDefault Om nyckel inte hittas, returneras detta värde - samt nyckel skapas
str sFilename Sökväg ini-fil

Beskrivning

Som en getprofilestring men den skapar Entryt med ett defaultvärde om den ej finns


Historik

Datum Notering
240425 NIPE = Funktion skapad



lsKRST_Path2Unit

str lsKRST_Path2Unit(str sPath)

Tar en sökväg och om innehållet kan bytas mot en unit så justeras den. Ex "C:\Pyramid\PYDATA\" blir "DAT:"

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sPath Sökväg

Beskrivning

Tar en sökväg och om innehållet kan bytas mot en unit så justeras den. Ex "C:\Pyramid\PYDATA\" blir "DAT:"
Hanterar LOG: UDD: DAT: TMP: CMP: PRG: UAG: UAD:


Historik

Datum Notering
240626 NIPE = Funktion skapad
240627 FRLA = Fixat så funktionen är case sensitive



lbKRST_ShowInvoice

bool lbKRST_ShowInvoice(str sInvoiceType, str sInvoiceNo, str sOptions, ref str sError)

Öppnar en fakturabild

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sInvoiceType Fakturatyp (L/F/K)
str sInvoiceNo Fakturanr
str sOptions Reserverad option
ref str sError Ev felmeddelande

Beskrivning

Öppnar en fakturabild
Använder Unikums eshow


Historik

Datum Notering
240628 FRLA = Funktion skapad



lsKRST_RemoveNonLettersOrNumerical

str lsKRST_RemoveNonLettersOrNumerical(str sString, str sOptions)

Funktion för att bara behålla bokstäver eller siffror

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Textsträng
str sOptions "B" - Bara få bokstäver i retur | "S" - Bara få siffror i retur

Beskrivning

Funktion för att bara behålla bokstäver eller siffror
Godkänner följande: abcdefghijklmnopqrstuvwxyzåäö0123456789


Historik

Datum Notering
240701 PIMA = Funktion skapad
240829 FRLA = Lagt till option för att vaska ut enbart bokstäver eller siffror och rättat en bugg



lsKRST_GetPrefix

str lsKRST_GetPrefix(str sString, str sOptions)

Funktion för att hämta ut ett prefix

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Ex inköpsnummer
str sOptions "A" - Alfanumeriskt prefix (standard om inget annat anges) | "S" - Rensa bort tecken som inte är bokstäver eller siffror

Beskrivning

Funktion för att hämta ut ett prefix


Historik

Datum Notering
240701 FRLA = Funktion skapad



lbKRST_PtcIsRunning

bool lbKRST_PtcIsRunning()

Är PTC på?

Parametrar

Typ (in / by ref) Variabel Beskrivning

Beskrivning

Är PTC på?

Kontroll sker genom att undersöka tips från Unikum:

PTC-tjänsten håller en fil låst i datakatalogen: PTC.LCK
Om den filen saknas eller går att ta bort så är ptc-tjänsten inte igång.
- Unikum

I den nya PTC:n så kan man titta i pgptca.
Om det finns någon post där nedanstående villkor är uppfyllda så är PTC i gång.
#-4435 Status = A
#-4434 Ping ska vara större än date(10) - 60

Historik

Datum Notering
240918 FRLA = Funktion skapad
241011 FRLA = Hanterar nu nya ptc monitor



lbKRST_PtcIsFinished

bool lbKRST_PtcIsFinished(str sUppdragskod, str sOptions, ref bool bHardError, ref str sError)

När startades ett uppdrag senast? (PTC måste vara igång och aktiverat)

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sUppdragskod Ex "TVC" för uptceTVC
str sOptions Reserverad
ref bool bHardError Returnerar sant ifall ptc:n och uppdraget är initerat
ref str sError Felmeddelande i retur

Beskrivning

När startades ett uppdrag senast? (PTC måste vara igång och aktiverat)


Historik

Datum Notering
20190828 FRLA = Funktion skapad



lbKRST_PtcStartWithShield

bool lbKRST_PtcStartWithShield(str sUppdragskod, str sTimeoutSec, str sOptions, ref str sError)

Startar ett PTC-uppdrag (PTC måste vara igång och aktiverat)

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sUppdragskod Ex "TVC" för uptceTVC
str sTimeoutSec Sekunder för att vänta på PTC. >0 sekunder. Blank = 30 sekunder.
str sOptions Reserverad
ref str sError Felmeddelande i retur

Beskrivning

Startar ett PTC-uppdrag (PTC måste vara igång och aktiverat)


Historik

Datum Notering
190828 FRLA = Funktion skapad
241213 FRLA = Buggfix sTimeoutSec
260624 FRLA = Lyft till TV2



lbKRST_LibExists

bool lbKRST_LibExists(str sLibName, str sOptions)

Finns ett eget lib?

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sLibName Ex) "ULKRLOG" (utan filändelse - ".b")
str sOptions Reserverad

Beskrivning

Finns ett eget lib?
Bra ifall ex en produkt använder diverse standardlib, eller kundunika uthopp till egna lib
Kollar om .b-fil finns i DS:LIB
Fungerar inte mot Unikums lib som förväntas finnas


Historik

Datum Notering
241011 FRLA = Funktion skapad
260908 FRLA = Tillägg SAAS



lbKRST_RegistryExists

bool lbKRST_RegistryExists(str sRegistry, str sOptions)

Finns ett register?

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sRegistry Ex) "URKRLOG"
str sOptions Reserverad

Beskrivning

Finns ett register?
Bra ifall ex en produkt som ligger i UAD använder ett register och vi vill kolla att det finns installerat i aktuellt bolag
Kollar ifall .BTR-fil finns i DAT:


Historik

Datum Notering
241011 FRLA = Funktion skapad



lbKRST_CopyData

bool lbKRST_CopyData(int iLuFrom, int iLuTo, str sDnrList, str sOptions, ref str sError)

Funktion för att kopiera alla datafält på en registerpost, t.ex kunden har flera bolag och vill spara ner Personal i båda bolagen samtidigt

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLuFrom Laddning att kopiera poster från
int iLuTo Laddning att kopiera poster till
str sDnrList Reserverad för att kunna ange kommatecken-separerad lista för vilka datanummer som ska kopieras
str sOptions "W": Kör lbDSLu_Write(iLuTo) efteråt | "U": Kör lbDSLu_Update(iLuTo) efteråt
ref str sError Felmeddelande i retur

Beskrivning

Funktion för att kopiera alla datafält på en registerpost, t.ex kunden har flera bolag och vill spara ner Personal i båda bolagen samtidigt


Historik

Datum Notering
241018 FRLA = Funktion skapad (samt TIHA, ursprungligen JOLA 2016)



lbKRST_GetDnr

bool lbKRST_GetDnr(int iLu, str sIndex, str sIndexKeyArgs, int iDnr, ref str sDnrValue, str sOptions, ref str sError)

Fungerar som en d_get - men du slipper ladda ett lu och justera teckenlängder!

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLu En laddning av ett indexregister - Om denna är 0 så försöker vi ladda lu:t internt. Notera att vissa lu:n inte får laddas i standarddialoger. Vid egen laddning utgår vi från indexregister först och därefter tabell.
str sIndex Namn på index i lu (se 5510)
str sIndexKeyArgs Kommatecken-separerad sträng som inte behöver vara längdjusterad. Går även bra att packa med lsDsArgX-funktionerna.
int iDnr Datanummer vars värde vi vill få i retur
ref str sDnrValue Värdet från posten som hittades
str sOptions Reserverad
ref str sError Kontrollerar tomma inargument (iLu/sIndex/sIndexKeyArgs), felaktigt index, att söknyckeln är komplett, att posten hittades

Beskrivning

Fungerar som en d_get - men du slipper ladda ett lu och justera teckenlängder!
Felmeddelande om vad som är fel returneras också ifall index inte finns eller inargumenten inte stämmer mot antal argument i indexet
Utgår från en exakt sökning.


Historik

Datum Notering
240920 FRLA = Funktion skapad
250213 FRLA = Fix för egenladdade tabeller



lsKRST_GetDnr

str lsKRST_GetDnr(int iLu, str sIndex, str sIndexKeyArgs, int iDnr)

Fungerar som en d_get - men du slipper ladda ett lu och justera teckenlängder!

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLu En laddning av ett indexregister (inte tabell) - Om denna är 0 så försöker vi ladda lu:t internt.
str sIndex Namn på index i lu (se 5510)
str sIndexKeyArgs Kommatecken-separerad sträng som inte behöver vara längdjusterad. Går även bra att packa med lsDsArgX-funktionerna.
int iDnr Datanummer vars värde vi vill få i retur

Beskrivning

Fungerar som en d_get - men du slipper ladda ett lu och justera teckenlängder!
Utgår från en exakt sökning.

sDnrValue = Värdet från posten som hittades

Historik

Datum Notering
240920 FRLA = Funktion skapad



lvKRST_LcDisableSettings

lvKRST_LcDisableSettings(int iLc)

Kapslar lc_tool_set med flaggor för att spärra kugghjulet på en lc

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iLc Kontrollid listkontroll

Beskrivning

Kapslar lc_tool_set med flaggor för att spärra kugghjulet på en lc

sOptions = Reserverad

Historik

Datum Notering
241219 FRLA = Funktion skapad



lvKRST_ValidateEf

lvKRST_ValidateEf(int iIdEf, bool bModified, int iSeekPreparedLu, int iParentLu, int iSeekDnr, str sIndex)

Kontrollerar om snabbsök innehåller korrekt värde.

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iIdEf Snabbsökens id, använd vanliga id:t via @global (ex efAtt)
bool bModified Kommer vi från _modified-händelse? Annars från _evaluate
int iSeekPreparedLu Förladdat lu för att leta efter värde i snabbsök. Ex -1905
int iParentLu Ex Lu 30 i W110 eller 52 i W430
int iSeekDnr Datanummer som finns i kundens pyramid kopplad mot snabbsöken (ex 30.6034 eller 52.6035)
str sIndex Index att hitta värdet i (ex "ORDNR")

Beskrivning

Kontrollerar om snabbsök innehåller korrekt värde.
Anropas via händelserna _modified och _evaluate


Historik

Datum Notering
240411 FRLA = Funktion skapad



lsKRST_AddLinebreaksEx

str lsKRST_AddLinebreaksEx(str sString, str sReplaceChars, str sOptions)

Vissa felmeddelanden från funktioner returnerar en lista med fel. Vi vill ibland ha det så och ibland få ut en radbruten popup.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Ex) "Fel inträffade: Rad 1 hittades inte, Rad 2 kunde inte sparas"
str sReplaceChars Tecken att byta ut
str sOptions Reserverad

Beskrivning

Vissa felmeddelanden från funktioner returnerar en lista med fel. Vi vill ibland ha det så och ibland få ut en radbruten popup.
Radbryt kolon och kommatecken
Ett kolon vill vi ska vara kvar, men också radbryta

Historik

Datum Notering
250227 FRLA = Funktion skapad



lsKRST_AddLinebreaks

str lsKRST_AddLinebreaks(str sString)

Snabbversionen av lsKRST_AddLinebreaksEx

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Ex) "Fel inträffade: Rad 1 hittades inte, Rad 2 kunde inte sparas"

Beskrivning

Snabbversionen av lsKRST_AddLinebreaksEx
Radbryt kolon och kommatecken

Historik

Datum Notering
250227 FRLA = Funktion skapad



lsKRST_Sigmoid

str lsKRST_Sigmoid(str x)

Sigmoid

Parametrar

Typ (in / by ref) Variabel Beskrivning
str x Intal

Beskrivning

Sigmoid


U

Historik

Datum Notering
250310 FRLA = Funktion skapad



lsKRST_SigmoidPrime

str lsKRST_SigmoidPrime(str x)

Derivata av sigmoid

Parametrar

Typ (in / by ref) Variabel Beskrivning
str x Intal

Beskrivning

Derivata av sigmoid
s'(x) = s(x)(1-s(x))
sigmoid'(x) = sigmoid(x)(1-sigmoid(x))


U

Historik

Datum Notering
250310 FRLA = Funktion skapad



liKRST_StrBoolToInt

int liKRST_StrBoolToInt(str sBool)

Konverterar string-bool till int

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sBool Ex) "J"/true/yes

Beskrivning

Konverterar string-bool till int


Om jag har en checkbox som jag ska sätta ett värde för som är en bool
Exempel: bm_set_check(xbDataNumbersIsCode, liKRST_StrBoolToInt(sIsCode))
J -> 1
N -> 0
U

Historik

Datum Notering
250422 GUST = Funktion skapad



lsKRST_IntBoolToStr

str lsKRST_IntBoolToStr(int iBool)

Konverterar int-bool till string

Parametrar

Typ (in / by ref) Variabel Beskrivning
int iBool 1/0

Beskrivning

Konverterar int-bool till string


Om jag har en checkbox som jag ska hämta ett värde ifrån som är en bool
Exempel: d_put(34, 18000, lsKRST_IntBoolToStr(bm_get_check(xbDataNumbersIsCode))
U

Historik

Datum Notering
250422 GUST = Funktion skapad



lsKRST_CreateGUIdKey

str lsKRST_CreateGUIdKey()

Skapar 36 tecken lång Globally Unique Identifier-nyckel

Parametrar

Typ (in / by ref) Variabel Beskrivning

Beskrivning

Skapar 36 tecken lång Globally Unique Identifier-nyckel
Använder sys_info. Denna funktion är för att lite lättare läsa kod.
Användning är t ex att öka prestanda där ex löpnummerserie inte längre behövs, men vi behöver fylla fältet med någonting unikt.
Ex "00000000-0000-0000-0000-000000000000"
Det totala antalet unika nycklar är 2128 (cirka 3,4×1038) så sannolikheten för att samma tal genereras fler än en gång är mycket liten.
Om varje människa på jorden genererade 600 miljoner nycklar skulle sannolikheten för att två likadana genereras ligga på 50%.
- Wikipeda
U

Historik

Datum Notering
250424 ANGR = Funktion skapad



lbKRST_UnpackZip

bool lbKRST_UnpackZip(str sPath, str sTargetPath, str sOptions, ref str sError)

Zippar upp fil och lägger innehållet i en mapp

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sPath zipfilen
str sTargetPath Målmapp
str sOptions Reserverad
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Zippar upp fil och lägger innehållet i en mapp



Historik

Datum Notering
250610 FRLA = Funktion skapad



lbKRST_ClearTempFolder

bool lbKRST_ClearTempFolder(str sFolderNameinTMP, str sFileWorm, str sOptions, ref str sError)

Töm valfri undermapp och undermappar i TMP: på filer

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFolderNameinTMP Katalognamn (ange inte hela sökvägen utan bara vilken mapp i TMP:
str sFileWorm Ex "*.pdf". Om tom kommer "*" användas för alla filer.
str sOptions Reserverad för framtida bruk
ref str sError Returnerar ev felmeddelande i klartext

Beskrivning

Töm valfri undermapp och undermappar i TMP: på filer



Historik

Datum Notering
250611 FRLA = Funktion skapad



lbKRST_ReturnDocumentsInFolder

bool lbKRST_ReturnDocumentsInFolder(str sFolderPath, str sFileWorm, ref str sDocumentList, str sOptions, ref str sError)

Hur många och vilka dokument är det i en viss mapp samt undermappar? Summera ihop allt och få ev. felmeddelanden i retur.

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sFolderPath Sökväg mapp
str sFileWorm Ex "*.pdf". Om tom kommer "*" användas för alla filer.
ref str sDocumentList Returnerar pipe-separerad lista ("|") över filer med exakt sökväg
str sOptions Reserverad
ref str sError Felmeddelande i retur

Beskrivning

Hur många och vilka dokument är det i en viss mapp samt undermappar? Summera ihop allt och få ev. felmeddelanden i retur.

Historik

Datum Notering
250611 FRLA = Funktion skapad
250702 FRLA = Rättning, använder nu "|" istället för "," för retur av lista



lsKRST_RemoveDuplicateStringEntries

str lsKRST_RemoveDuplicateStringEntries(str sString, str sSeparator)

Tar bort dubbletter från en stränglista

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Sträng med element separerade av sSeparator (t.ex. "A,B,A,C")
str sSeparator Tecken som används som avgränsare (t.ex. ","). Om separator är tom, returnera originalsträngen direkt

Beskrivning

Tar bort dubbletter från en stränglista


Returvärde = Sträng utan dubbletter, i samma ordning som första förekomsten

Historik

Datum Notering
251023 FRLA = Funktion skapad



liKRST_GetLastStringPos

int liKRST_GetLastStringPos(str sString, str sDelimiter)

Letar upp sista förekomst av sträng, ex "/" i en sökväg

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sString Sträng
str sDelimiter Separator

Beskrivning

Letar upp sista förekomst av sträng, ex "/" i en sökväg

Historik

Datum Notering
260303 FRLA = Funktion skapad



lsKRST_MoveUpPathLevels

str lsKRST_MoveUpPathLevels(str sPathToAdjust, int iParentLevels, str sOptions)

Vi vill hoppa upp ett steg i katalogstrukturen

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sPathToAdjust Sökväg
int iParentLevels Antal steg upp mot roten
str sOptions

Beskrivning

Vi vill hoppa upp ett steg i katalogstrukturen
(ex för att utgå från DAT: och sedan gå till prog-mappen som ligger jämte då den försvann som enhet i vissa 4.18-versioner)
Tar höjd för negativa värden på iParentLevels.
Hanterar UNC-sökvägar

Historik

Datum Notering
260303 FRLA = Funktion skapad



lsKRST_GetPROG

str lsKRST_GetPROG()

PROG: försvann som enhet i vissa 4.18-versioner

Parametrar

Typ (in / by ref) Variabel Beskrivning

Beskrivning

PROG: försvann som enhet i vissa 4.18-versioner

Historik

Datum Notering
260303 FRLA = Funktion skapad



lbKRST_ShowFile

bool lbKRST_ShowFile(str sPath, int iId, str sStyle, str sOptions, ref str sError)

Kör shell_execute och öppnar med windows default-program för filändelsen - alt i webben laddar upp och öppnar i platta eller ny flik

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sPath Sökväg till fil i pyramid
int iId Kontroll id för platta med ww_webpage (om blank öppnas ny flik med www)
str sStyle Formatering ex) width:100%;height:100%;border:1;border-width:thin;
str sOptions Reserverad
ref str sError Felmeddelande i retur

Beskrivning

Kör shell_execute och öppnar med windows default-program för filändelsen - alt i webben laddar upp och öppnar i platta eller ny flik

Historik

Datum Notering
260624 FRLA = Funktion skapad



lvKRST_ShowFile

lvKRST_ShowFile(str sPath, str sOptions)

Kör shell_execute och öppnar med windows default-program för filändelsen - alt i webben laddar upp och öppnar ny flik

Parametrar

Typ (in / by ref) Variabel Beskrivning
str sPath Sökväg till fil i pyramid
str sOptions Reserverad

Beskrivning

Kör shell_execute och öppnar med windows default-program för filändelsen - alt i webben laddar upp och öppnar ny flik

Historik

Datum Notering
260624 FRLA = Funktion skapad



lsKRST_GetEnvironment

str lsKRST_GetEnvironment()

Returnerar vilken miljö vi är i

Parametrar

Typ (in / by ref) Variabel Beskrivning

Beskrivning

Returnerar vilken miljö vi är i
BS = Business Studio via portalen (webkrut)
SAAS = Business Studio via windows
WIN = Hybrid Cloud via Windows
PPW = Hybrid Cloud via PPW (webkrut)

Historik

Datum Notering
260908 FRLA = Funktion skapad



Dokumentation genererad av KR System