©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DGV53PT3 ;ALB/MTC - MAS v5.3 Post Init Routine ; 07 JAN 93
Source file <DGV53PT3.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | NOW^%DTC ^DIE |
| Registration | 1 | (ADDPC,COMFILE,DONE,NEWFILE,WRERROR)^DGV53PT1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DGPM19(RECNUM,PROV) | ;-- process DGPM '.19' field of the 0 node
; INPUT : RECNUM - Record Number to process ; PROV - Current Provider Pointer |
|
| REST405(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 405 |
|
| UPDT | ;-- This function will update the file 43 and 405
|
|
| DGPM08(RECNUM,PROV) | ;-- process DGPM '.08' field of the 0 node
; INPUT : RECNUM - Record Number to process ; PROV - Current Provider Pointer |
|
| CON405 | ;-- This routine will perform the conversion to file #200 for the
; Patient Movement File (#405) |
|
| CON405Q | ;-- exit
|
| FileNo | Call Tags |
|---|---|
| ^DGPM - [#405] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(43 - [#43] | CON405+9, REST405+5*, REST405+6, UPDT+5*, UPDT+11* |
| ^DGPM - [#405] | CON405+17, REST405+11, REST405+14, REST405+17 |
| ^DGPM("ATT6" | CON405+17, REST405+17 |
| ^DIC(16 - [#16] | DGPM08+5, DGPM08+6, DGPM19+5, DGPM19+6 |
| Name | Line Occurrences |
|---|---|
| CON405Q | CON405+11 |
| DGPM08 | REST405+12, UPDT+7 |
| DGPM19 | REST405+15, UPDT+13 |
| REST405 | CON405+15 |
| UPDT | CON405+17, REST405+17 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | REST405+5 |
| >> CURPT | REST405+6* |
| DA | DGPM08+7*!, DGPM19+7*! |
| DATE | CON405+3~, CON405+17*, REST405+6*, REST405+8, REST405+17, UPDT+5, UPDT+11 |
| DGPMT | CON405+3~, CON405+5* |
| DIE | DGPM08+7*!, DGPM19+7*! |
| DR | DGPM08+7*!, DGPM19+7*! |
| MULT | CON405+3~, REST405+6* |
| NODE | CON405+3~, REST405+6*, REST405+12, REST405+15 |
| OK | CON405+3~, CON405+15*, CON405+19, DGPM08+6*, DGPM19+6* |
| PREC | CON405+3~, CON405+9*, CON405+11, CON405+15, REST405~, REST405+5, REST405+6, REST405+12, REST405+15 |
| PROV | CON405+3~, DGPM08~, DGPM08+5, DGPM08+6, DGPM19~, DGPM19+5, DGPM19+6 |
| PSAV | CON405+3~, CON405+9*, CON405+15, CON405+19, REST405~, REST405+5, REST405+6, UPDT+5, UPDT+11 |
| REC | CON405+3~, CON405+17*, REST405+17*, UPDT+3, UPDT+9 |
| RECNUM | CON405+3~, CON405+17*, DGPM08~, DGPM08+6, DGPM08+7, DGPM19~, DGPM19+6, DGPM19+7, REST405+6*, REST405+11 , REST405+12, REST405+14, REST405+15, REST405+17*, UPDT+5, UPDT+7, UPDT+11, UPDT+13 |
| SEQ | CON405+3~ |
| >> STIME | REST405+6*, UPDT+5, UPDT+11 |
| TREC | CON405+3~, CON405+17*, CON405+19, REST405+6*, UPDT+5, UPDT+11 |
| U | CON405+11, DGPM08+6, DGPM19+6, REST405+5, REST405+6, REST405+11, REST405+12, REST405+14, REST405+15, UPDT+3 , UPDT+5, UPDT+9, UPDT+11 |
| X | DGPM08+4~, DGPM08+5*, DGPM08+6, DGPM08+7, DGPM19+4~, DGPM19+5*, DGPM19+6, DGPM19+7, REST405+11*, REST405+12 , REST405+14*, REST405+15, UPDT+3*, UPDT+5, UPDT+7, UPDT+9*, UPDT+11, UPDT+13 |
| Y | DGPM08+4~, DGPM08+6*, DGPM19+4~, DGPM19+6* |