SCMCHLR9 ;ALB/KCL - PCMM HL7 Reject Transmission Report Con't; 22-FEB-2000
Source file <SCMCHLR9.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 4 | $$GETLOG^SCMCHLA ($$GETEC,$$GETHL7ID)^SCMCHLA2 ($$DRMSG,$$MRKMSG)^SCMCHLR1 GET^SCMCHLR2 |
Kernel | 3 | ^%ZISC ($$FMTE,$$NOW)^XLFDT $$LJ^XLFSTR |
Registration | 2 | PID^VADPT ($$FDATE,$$LOWER)^VALM1 |
VA Fileman | 2 | $$EXTERNAL^DILFD ^DIR |
Name | Comments | DBIA/ICR reference |
---|---|---|
PAUSE | ; Description: Screen pause. Sets QUIT=1 if user decides to quit.
|
|
LJ(STRING,LENGTH) | ;
|
|
PRINTERR(SCSORTBY,SCEPS) | ; Description: Print list of errors.
|
|
HEADER | ; Description: Prints the report header.
|
|
; Description: Used to print report.
|
||
LINE(LINE) | ;
; Description: Prints a line. First prints header if at end of page. |
Name | Field # of Occurrence |
---|---|
^%ZISC | PRINT+20 |
$$EXTERNAL^DILFD | PRINTERR+51, PRINTERR+60 |
^DIR | PAUSE+5 |
$$GETLOG^SCMCHLA | PRINTERR+24 |
$$GETEC^SCMCHLA2 | PRINTERR+66 |
$$GETHL7ID^SCMCHLA2 | PRINTERR+48 |
$$DRMSG^SCMCHLR1 | HEADER+14 |
$$MRKMSG^SCMCHLR1 | HEADER+17 |
GET^SCMCHLR2 | PRINT+11 |
PID^VADPT | PRINTERR+34 |
$$FDATE^VALM1 | PRINTERR+39 |
$$LOWER^VALM1 | PRINTERR+30, PRINTERR+39, PRINTERR+51, PRINTERR+60, PRINTERR+67 |
$$FMTE^XLFDT | HEADER+5, HEADER+12 |
$$NOW^XLFDT | HEADER+5 |
$$LJ^XLFSTR | LJ+2 |
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 |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
404.47142 | EXTERNAL^DILFD |
^SCTM(404.52 - [#404.52] | EXTERNAL^DILFD |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | PRINTERR+30 |
^SCPT(404.471 - [#404.471] | PRINTERR+46 |
^SCTM(404.52 - [#404.52] | PRINTERR+50 |
^TMP( | PRINT+6!, PRINT+22! |
^TMP("SCERRSRT" | PRINTERR+15, PRINTERR+18, PRINTERR+21 |
Name | Line Occurrences |
---|---|
$$LJ | PRINTERR+31, PRINTERR+36, PRINTERR+40, PRINTERR+52, PRINTERR+57, PRINTERR+61, PRINTERR+68 |
HEADER | PRINT+16, LINE+7, LINE+12 |
LINE | PRINTERR+63, PRINTERR+69 |
PAUSE | PRINT+18, LINE+4 |
PRINTERR | PRINT+17 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CRT | PRINT+3~, PRINT+8*, PRINT+14, PRINT+18, LINE+3, LINE+10 |
DFN | PRINTERR+11~, PRINTERR+34* |
DIR | PAUSE+2~ |
DIR(0 | PAUSE+4* |
>> DIRUT | PAUSE+6 |
IO | PRINT+13 |
IOF | PRINT+14, LINE+6, LINE+11, HEADER+3 |
IOSL | LINE+3, LINE+10, PAUSE+3 |
IOST | PRINT+8 |
LENGTH | LJ~, LJ+2 |
LINE | LINE~, LINE+8, LINE+13, LINE+15, HEADER+2~, HEADER+21*, HEADER+22 |
PAGE | PRINT+3~, PRINT+7*, PRINT+14, PRINT+15*, HEADER+6, HEADER+7* |
QUIT | PRINT+3~, PRINT+7*, PRINT+18, LINE+5, PAUSE+6*, PRINTERR+15, PRINTERR+18, PRINTERR+21, PRINTERR+63, PRINTERR+69 |
SCARRAY | PRINT+3~, PRINT+4!, PRINT+5*, PRINT+6, PRINT+11, PRINT+22 |
SCEPS | PRINTERR~ |
SCERIEN | PRINTERR+11~, PRINTERR+20*, PRINTERR+21*, PRINTERR+24 |
>> SCERR | PRINTERR+66 |
>> SCERR("CODE" | PRINTERR+67 |
>> SCERR("SHORT" | PRINTERR+67 |
SCHL | PRINTERR+43!, PRINTERR+48 |
SCHL("HL7ID" | PRINTERR+49, PRINTERR+55 |
SCLINE | PRINTERR+11~, PRINTERR+27*, PRINTERR+31*, PRINTERR+36*, PRINTERR+40*, PRINTERR+52*, PRINTERR+57*, PRINTERR+61*, PRINTERR+63, PRINTERR+68* , PRINTERR+69 |
SCPROV | PRINTERR+11~, PRINTERR+44*, PRINTERR+46*, PRINTERR+50*, PRINTERR+51 |
>> SCPTR | PRINTERR+49*, PRINTERR+50 |
>> SCRP("BEGIN" | PRINT+11, HEADER+11, HEADER+12 |
>> SCRP("END" | PRINT+11, HEADER+12 |
>> SCRP("EPS" | PRINT+11, PRINT+17, HEADER+15 |
>> SCRP("SORT" | PRINT+11, PRINT+17, HEADER+9 |
SCSORTBY | PRINTERR~, PRINTERR+14, PRINTERR+15, PRINTERR+18, PRINTERR+21 |
SCSUB | PRINTERR+11~, PRINTERR+14*, PRINTERR+15*, PRINTERR+18, PRINTERR+21 |
SCTLIEN | PRINTERR+11~, PRINTERR+17*, PRINTERR+18*, PRINTERR+21, PRINTERR+24, PRINTERR+46 |
SCTLOG | PRINTERR+11~, PRINTERR+24 |
SCTLOG("ACK D | T/TM" , PRINTERR+39 |
SCTLOG("DFN" | PRINTERR+30, PRINTERR+34 |
SCTLOG("ERR" | PRINTERR+47, PRINTERR+48, PRINTERR+60, PRINTERR+66 |
SCTLOG("STATUS" | PRINTERR+27 |
SCTLOG("WORK" | PRINTERR+30, PRINTERR+46, PRINTERR+50 |
SCTXT | PRINTERR+11~, PRINTERR+30*, PRINTERR+31, PRINTERR+39*, PRINTERR+40, PRINTERR+51*, PRINTERR+52, PRINTERR+56*, PRINTERR+57, PRINTERR+60* , PRINTERR+61, PRINTERR+67*, PRINTERR+68 |
SCTYPE | PRINTERR+11~, PRINTERR+55*, PRINTERR+56 |
STRING | LJ~, LJ+2 |
SUBSCRPT | PRINT+3~ |
U | PRINTERR+46 |
>> VA("BID" | PRINTERR+36 |
X | HEADER+2~, HEADER+9*, HEADER+10, HEADER+15*, HEADER+16, PAUSE+2~ |
Y | PAUSE+2~, PAUSE+6 |
>> ZTQUEUED | PRINT+19 |
>> ZTREQ | PRINT+19* |