BPSOSUD ;BHAM ISC/FCS/DRS/FLS - utils, some options ;06/01/2004
Source file <BPSOSUD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INCSTAT(N1,P1,N2,P2,N3,P3) | ;EP - BPSBUTL,BPSOSQL
; increment the given N nodes at the P pieces |
|
| ADDSTAT(N1,P1,Q1,N2,P2,Q2,N3,P3,Q3) | ;
; add Quantities to given Nodes,Pieces |
|
| ADD1STAT(N,P,Q) | ;
|
|
| DATETIME(Y) | ;EP - convert fileman date.time to printable
|
|
| TIMEAGO(THEN) | ; external form for TIMEAGOI
|
|
| TIMEAGOI(THEN) | ; how many seconds ago was it? returns positive value
|
|
| TIMEDIFI(X1,X2) | ;EP - Computed field of BPS Log of Transactions and BPS Transactions
; time difference in seconds, negative if X1>X2 |
|
| TIMEDIF(X1,X2) | ;EP - Computed field of BPS Log of Transactions and BPS Transactions
|
|
| SECSDHMS(X) | ;EP - seconds -> # da # hr # min # sec
|
|
| PRESSANY | ||
| CONTINUE(DEF) | ;EP -
; returns a single character ; or returns DEF, the default |
|
| CONT1 | ;
|
|
| TT() | ||
| SHOULDNT | ||
| TDIFNOW(T) | ;EP - ; compute time difference between T and NOW
; returns # of seconds, positive if T precedes now (how long ago) ; negative if T follows NOW (countdown "T minus...") |
|
| TDIF(T1,T2) | ; compute time difference T1-T2 = how many seconds
|
|
| TADDSECS(T1,SECS) | ; add SECS seconds to T1
|
|
| BADPARAM(VARNAME,ATLABEL) | ||
| TADDNOWS(SECS) | ;EP - add SECS seconds to NOW
|
|
| SECS2T2(SECS) | ; convert integer seconds into a fileman time format
|
|
| TADDNOW(T2) | ;EP - ; add T2 time differential to NOW
|
|
| TADD(T1,T2) | ;EP - ; add T2 time differential to T1
|
|
| CDTC(X1,X2) |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
