DGV53PT4 ;MTC/ALB - Provider Conversion Continued ; 21 JAN 93
Source file <DGV53PT4.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 2 | NOW^%DTC ^DIE |
Registration | 1 | (ADDPC,COMFILE,DONE,NEWFILE,WRERROR)^DGV53PT1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CON457Q | ;
|
|
CON392 | ;-- This routine will perform the conversion to file #200 for the
; Benificiary Travel Claim File (#392) |
|
REST457(PREC,PSAV) | ;-- This tag will re-process the PTF entry incase the conversion
; needs to be re-started. ; INPUT : PREC - 0 Node of entry in MAS Parameter File for file 45.7 ; PSAV - IFN of the entry in file 43 |
|
DIC457(RECNUM,SEQ,PROV) | ;-- process PTF 'PRO' multiple
; INPUT :RENUM - PTF Record Number to process ; SEQ - Sequence Number in 'PRO' multiple ; PROV - Current Provider Pointer |
|
DGBT392(RECNUM,PROV) | ;-- process ^DGBT field 41
; INPUT : RECNUM - Record Number to process ; PROV - Current Provider Pointer |
|
CON392Q | ;-- exit
|
|
CON457 | ;-- This routine will perform the conversion to file #200 for the
; Facility Treating Specialty (#45.7) |
|
REST392(PREC,PSAV) | ;-- This tag will re-process the entry incase the conversion
; needs to be re-started. ; INPUT : PREC - 0 Node of entry in MAS Parameter File for file 392 |
FileNo | Call Tags |
---|---|
^DGBT(392 - [#392] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(43 - [#43] | CON457+7, CON457+21*, REST457+5*, REST457+6, REST457+15*, CON392+7, CON392+19*, REST392+5*, REST392+6 |
^DGBT(392 - [#392] | CON392+15, CON392+17, REST392+9 |
^DIC(16 - [#16] | DIC457+6, DIC457+7, DGBT392+6, DGBT392+7 |
^DIC(45.7 - [#45.7] | CON457+15, CON457+17, CON457+19, REST457+9, REST457+11, REST457+13 |
Name | Line Occurrences |
---|---|
CON392Q | CON392+9 |
CON457Q | CON457+9 |
DGBT392 | CON392+21, REST392+10 |
DIC457 | CON457+22, REST457+10, REST457+16 |
REST392 | CON392+13 |
REST457 | CON457+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | REST457+5, REST392+5 |
>> CURPT | REST457+6*, REST392+6* |
DA | DIC457+8*!, DGBT392+8*! |
DA(1 | DIC457+8* |
DIE | DIC457+8*!, DGBT392+8*! |
DR | DIC457+8*!, DGBT392+8*! |
MULT | CON457+3~, REST457+6*, CON392+3~, REST392+6* |
NODE | CON457+3~, REST457+6*, CON392+3~, REST392+6* |
OK | CON457+3~, CON457+13*, CON457+24, DIC457+7*, CON392+3~, CON392+13*, CON392+23, DGBT392+7* |
PREC | CON457+3~, CON457+7*, CON457+9, CON457+13, REST457~, REST457+5, REST457+6, REST457+10, CON392+3~, CON392+7* , CON392+9, CON392+13, REST392~, REST392+5, REST392+6, REST392+10 |
PROV | CON457+3~, CON457+19*, CON457+21, CON457+22, DIC457~, DIC457+6, DIC457+7, REST457+13*, REST457+15, REST457+16 , CON392+3~, CON392+17*, CON392+19, CON392+21, DGBT392~, DGBT392+5, DGBT392+6, DGBT392+7 |
PSAV | CON457+3~, CON457+7*, CON457+13, CON457+21, CON457+24, REST457~, REST457+5, REST457+6, REST457+15, CON392+3~ , CON392+7*, CON392+13, CON392+19, CON392+23, REST392~, REST392+5, REST392+6 |
RECNUM | CON457+3~, CON457+15*, CON457+17, CON457+19, CON457+21, CON457+22, DIC457~, DIC457+7, DIC457+8, REST457+6* , REST457+7, REST457+9, REST457+10, REST457+11, REST457+13, REST457+15, REST457+16, CON392+3~, CON392+15*, CON392+17 , CON392+19, CON392+21, DGBT392~, DGBT392+7, DGBT392+8, REST392+6*, REST392+7, REST392+9, REST392+10 |
SEQ | CON457+3~, CON457+17*, CON457+19, CON457+21, CON457+22, DIC457~, DIC457+7, DIC457+8, REST457+6*, REST457+7 , REST457+9, REST457+10, REST457+11*, REST457+13, REST457+15, REST457+16, CON392+3~, REST392+6* |
STIME | CON457+21, REST457+6*, REST457+15, CON392+3~, CON392+19, REST392+6* |
TREC | CON457+3~, CON457+15*, CON457+21, CON457+24, REST457+6*, REST457+15, CON392+3~, CON392+15*, CON392+19, CON392+23 , REST392+6* |
U | CON457+9, CON457+19, CON457+21, DIC457+7, REST457+5, REST457+6, REST457+9, REST457+10, REST457+13, REST457+15 , CON392+9, CON392+17, CON392+19, DGBT392+7, REST392+5, REST392+6, REST392+9, REST392+10 |
X | DIC457+5~, DIC457+6*, DIC457+7, DIC457+8, REST457+9*, REST457+10, DGBT392+4~, DGBT392+6*, DGBT392+7, DGBT392+8 , REST392+9*, REST392+10 |
Y | DIC457+5~, DIC457+7*, DGBT392+4~, DGBT392+7* |