DVBAB6 ;ALB/DJS - CAPRI PENDING 2507 REQUEST REPORT ; 9/8/21 3:59pm
Source file <DVBAB6.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
STRT(MSG,DVBCSORT,RSTAT,ERDAYS,OLDAYS,ADIVNUM,ELTYP,DVBADLMTR,ROFILTER) | ;
; MSG=DATA Passed back from RPC to GUI;(.MSG,"A","NR",1,1,7613,"W",0,0) |
|
SETUP | ||
HEAD | ||
HEADRND | ; Print non-delimited output header
|
|
HEADRD | ; Print delimited output header
|
|
DATA | ; Sort data records
|
|
EXIT | ||
; print 2507 request data
|
||
ITEMS | ||
ITEMSND | ||
ITEMSD | ||
PRINTD | ; Print delimited format output on report
|
|
NXT | ;F DA(1)=0:0 S DA(1)=$O(^TMP($J,JX,PNAM,DFN,DA(1))) Q:DA(1)="" D PRINT I $D(OUT) S DA(1)="",PNAM="ZZZZ",JX=$S($A(JX)>57:PNAM,1:9999999),DONE="YES"
|
|
TST | ||
TST1 | ||
CLAIMTYP | ;THE CLAIM TYPE OF A 2507 REQUEST
|
|
SPEC | ;SPECIAL CONSIDERATION(S) FOR A 2507 REQUEST
|
|
REROUTE | ;REROUTE INFO FOR A 2507 REQUEST
|
RPC Name | Call Tags |
---|---|
DVBAB 2507 PENDING REPORT | STRT |
DVBAB PENDING C&P REPORT | STRT |
FileNo | Call Tags |
---|---|
^DVB(396.3 - [#396.3] | EXTERNAL^DILFD, GETS^DIQ |
396.34 | EXTERNAL^DILFD |
^DVB(396.4 - [#396.4] | EXTERNAL^DILFD |