PRCPSLOI ;WISC/RFJ-create and transmit 663,669 code sheets ;19 Feb 92
Source file <PRCPSLOI.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DQ(TRANNO,TRANID) | ; create/trans receiving code sheets to log
; tranno=transaction number ; tranid=tran register id number |
|
ASKDEPT | ; ask department number
; prcpflag is returned if incorrect response |
|
ASKPER | ; ask dietetic period
; prcpflag is returned if incorrect response |
|
ASKDEPOT | ; ask depot number (field 107 in 442)
; prcpflag is returned if incorrect response |
|
ASKVOUCH | ; ask depot voucher number (field .09 in 442)
; prcpflag is returned if incorrect response |
|
ASKREQNO | ; ask requisition number (supply) (field 102.4 in 442)
; prcpflag is returned if incorrect response |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|