RCDMCUT2 ;HEC/SBW - Utility Functions for Hold Debt to DMC Project ;30/AUG/2007
Source file <RCDMCUT2.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
DEVICE(ROUTINE,DESC,STOPIT,RCSCR,BEGDT,EXCEL,RCTYPE,RCDMC) | ;
|
|
STOPIT() | ; Checks if user requested task to stop
|
|
EXCEL() | ; - Returns whether to capture data for Excel report.
|
|
HEXC | ; - 'Do you want to capture data...' prompt
|
|
EXMSG | ; - Displays the message about capturing to an Excel file format
|
|
GETTYPE(STOPIT) | ; Choose a (S)ummary or (D)etail or (E)xcel Delimited Report
|
|
GETTYPE2(STOPIT) | ; Choose a (S)ummary or (D)etail
|
|
BILLPAYS() | ; Do you want to see only bills with payments?
|
|
GETDMC(STOPIT) | ;Chose DMC Debt Valid field value to include Null, Pending,
; Yes, No and All vallues |
|
EXTTYPE(TYPE) | ;Get Set of Code external format for Report type
|
|
EXTDMC(VAL) | ;Get Set of Code external format for DMC Debt Valid field value
|
|
DATE(PROMPT,PROMPT2,BEG,END,DTYPE) | ;Get beginning and Ending dates
|
|
DATE2(PROMPT,PROMPT2,BEG,END,DTYPE) | ;Get beginning and Ending dates
|
|
GETBEGDT(PROMPT1,PROMPT2,DTPROMPT) | ;Get beginning date
|
|
ARSTAT(STOPIT) | ;Chose AR status
; Yes, No and All vallues |
|
PAUSE | ;If sending report to screen display pause message at screen bottom
|
|
PAUSE2 | ;If sending report to screen display pause message at screen bottom;
|
|
ULINE(X,WIDTH) | ;Display line of a given character
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | DATE+20, DATE+30, DATE2+20, DATE2+30 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | DATE+13~, DATE+17*, DATE+23!, DATE+27*, DATE+32!, DATE2+13~, DATE2+17*, DATE2+23!, DATE2+27*, DATE2+32! , GETBEGDT+9~, GETBEGDT+13*, GETBEGDT+19! |
%DT("A" | DATE+18*, DATE+28*, DATE2+18*, DATE2+28*, GETBEGDT+14* |
%DT("B" | DATE+19*, DATE+20*, DATE+29*, DATE+30*, DATE2+19*, DATE2+20*, DATE2+29*, DATE2+30*, GETBEGDT+15* |
%DT(0 | GETBEGDT+16* |
%ZIS | DEVICE+14~, DEVICE+17* |
BEG | DATE~, DATE+19, DATE+20, DATE2~, DATE2+19, DATE2+20 |
BEGDT | DEVICE~, DEVICE+16, DATE+13~, DATE+26*, DATE+36, DATE+39, DATE2+13~, DATE2+26*, DATE2+36, DATE2+39 , GETBEGDT+9~, GETBEGDT+22*, GETBEGDT+23 |
BP | BILLPAYS+7~, BILLPAYS+9*, BILLPAYS+14*, BILLPAYS+15*, BILLPAYS+16 |
DESC | DEVICE~, DEVICE+29 |
DIR | EXCEL+7~, GETTYPE+7~, GETTYPE2+7~, BILLPAYS+7~, GETDMC+8~, ARSTAT+8~ |
DIR("?" | EXCEL+12*, GETDMC+11*, GETDMC+12*, GETDMC+13*, GETDMC+14*, GETDMC+15*, GETDMC+16* |
DIR("A" | EXCEL+11*, GETTYPE+9*, GETTYPE2+9*, BILLPAYS+11*, GETDMC+10*, ARSTAT+13* |
DIR("B" | EXCEL+10*, GETTYPE2+10*, BILLPAYS+10*, ARSTAT+14* |
DIR("T" | EXCEL+10*, BILLPAYS+10* |
DIR(0 | EXCEL+10*, GETTYPE+8*, GETTYPE2+8*, BILLPAYS+10*, GETDMC+9*, ARSTAT+12* |
DIROUT | EXCEL+7~, EXCEL+14, GETTYPE+7~, GETTYPE+12, GETTYPE2+7~, GETTYPE2+13, BILLPAYS+7~, BILLPAYS+14, GETDMC+8~, GETDMC+19 , DATE+13~, DATE2+13~, GETBEGDT+9~, ARSTAT+8~, ARSTAT+17 |
DIRUT | EXCEL+7~, EXCEL+14, GETTYPE+7~, GETTYPE+12, GETTYPE2+7~, GETTYPE2+13, BILLPAYS+7~, BILLPAYS+14, GETDMC+8~, GETDMC+19 , DATE+13~, DATE2+13~, GETBEGDT+9~, ARSTAT+8~, ARSTAT+17 |
DT | GETBEGDT+15, GETBEGDT+16 |
DTIME | EXCEL+10, BILLPAYS+10, PAUSE+4, PAUSE2+4 |
DTOUT | EXCEL+7~, EXCEL+14, GETTYPE+7~, GETTYPE+12, GETTYPE2+7~, GETTYPE2+13, BILLPAYS+7~, BILLPAYS+14, GETDMC+8~, GETDMC+19 , DATE+13~, DATE2+13~, GETBEGDT+9~, ARSTAT+8~, ARSTAT+17 |
DTPROMPT | GETBEGDT~, GETBEGDT+14 |
DTYPE | DATE~, DATE+18, DATE+28, DATE2~, DATE2+18, DATE2+28 |
DUOUT | EXCEL+7~, EXCEL+14, GETTYPE+7~, GETTYPE+12, GETTYPE2+7~, GETTYPE2+13, BILLPAYS+7~, BILLPAYS+14, GETDMC+8~, GETDMC+19 , DATE+13~, DATE2+13~, GETBEGDT+9~, ARSTAT+8~, ARSTAT+17 |
END | DATE~, DATE+29, DATE+30, DATE2~, DATE2+29, DATE2+30 |
ENDDT | DATE+13~, DATE+35*, DATE+36, DATE+39, DATE2+13~, DATE2+35*, DATE2+36, DATE2+39 |
EXCEL | DEVICE~, EXCEL+7~, EXCEL+9*, EXCEL+14*, EXCEL+15*, EXCEL+17 |
I | ULINE+5~, ULINE+8* |
IO | PAUSE+7, PAUSE2+7 |
IO("Q" | DEVICE+22 |
IO(0 | PAUSE+2, PAUSE2+2 |
ION | DEVICE+24 |
IOST | DEVICE+20 |
OUT | DATE+13~, DATE+14*, DATE+25, DATE+34, DATE+36*, DATE+39*, DATE+40, DATE2+13~, DATE2+14*, DATE2+25 , DATE2+34, DATE2+36*, DATE2+39*, DATE2+40, GETBEGDT+9~, GETBEGDT+10*, GETBEGDT+21, GETBEGDT+23*, GETBEGDT+24 |
POP | DEVICE+14~, DEVICE+19 |
PROMPT | DATE~, DATE+15, DATE2~, DATE2+15 |
PROMPT1 | GETBEGDT~, GETBEGDT+11 |
PROMPT2 | DATE~, DATE+16, DATE2~, DATE2+16, GETBEGDT~, GETBEGDT+12 |
RCDMC | DEVICE~ |
RCSCR | DEVICE~, DEVICE+20* |
RCTYPE | DEVICE~ |
RCX | STOPIT+6~, STOPIT+8*, STOPIT+9 |
ROUTINE | DEVICE~, DEVICE+15, DEVICE+23 |
STOPIT | DEVICE~, DEVICE+15*, DEVICE+16*, DEVICE+19*, DEVICE+22*, STOPIT+6~, STOPIT+7*, STOPIT+10*, STOPIT+12, GETTYPE~ , GETTYPE+12*, GETTYPE2~, GETTYPE2+13*, GETDMC~, GETDMC+19*, ARSTAT~, ARSTAT+17*, PAUSE+6*, PAUSE2+6* |
TYPE | EXTTYPE~, EXTTYPE+7*, EXTTYPE+8 |
U | DATE+36, DATE+39, DATE2+36, DATE2+39, GETBEGDT+23 |
VAL | EXTDMC~, EXTDMC+7*, EXTDMC+8 |
WIDTH | ULINE~, ULINE+6*, ULINE+8 |
X | EXCEL+7~, GETTYPE+7~, GETTYPE2+7~, BILLPAYS+7~, GETDMC+8~, DATE+13~, DATE2+13~, GETBEGDT+9~, ARSTAT+8~, PAUSE+1~ , PAUSE+4*, PAUSE+5*, PAUSE+6, PAUSE2+1~, PAUSE2+4*, PAUSE2+5*, PAUSE2+6, ULINE~, ULINE+8 |
Y | EXCEL+7~, EXCEL+15, GETTYPE+7~, GETTYPE+12*, GETTYPE+13, GETTYPE2+7~, GETTYPE2+13*, GETTYPE2+14, BILLPAYS+7~, BILLPAYS+15 , GETDMC+8~, GETDMC+19*, GETDMC+20, DATE+13~, DATE+20*, DATE+25, DATE+26, DATE+30*, DATE+34, DATE+35 , DATE2+13~, DATE2+20*, DATE2+25, DATE2+26, DATE2+30*, DATE2+34, DATE2+35, GETBEGDT+9~, GETBEGDT+21, GETBEGDT+22 , ARSTAT+8~, ARSTAT+17*, ARSTAT+18 |
ZTDESC | DEVICE+14~, DEVICE+29* |
ZTIO | DEVICE+14~, DEVICE+24* |
ZTRTN | DEVICE+14~, DEVICE+23* |
ZTSAVE | DEVICE+14~ |
ZTSAVE("BEGDT" | DEVICE+27* |
ZTSAVE("EXCEL" | DEVICE+28* |
ZTSAVE("RC*" | DEVICE+25* |
ZTSAVE("STOPIT" | DEVICE+26* |
ZTSK | DEVICE+14~, DEVICE+31, STOPIT+11 |
>> ZTSTOP | STOPIT+11* |