DGPTAE04 ;ALB/MTC/ADL,HIOFO/FT - 401 Edit Checks Cont ;6/11/15 11:10am
Source file <DGPTAE04.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Registration | 1 | DGPT401 |
Name | Comments | DBIA/ICR reference |
---|---|---|
TRAN | ;-- verify transplant status
|
|
CHIEF | ;chief surgeon
|
|
FAST | ;first assistant
|
|
ANES | ;anesthesia technique
|
|
FIRST | ;-- Edit surgeries - present in ICD0 OPERATIONS, current, gender ok
|
|
LOOP | ;check surgery procedure codes
|
|
CHKOPC | ;
|
|
GEN | ;check patient's gender - 884 no longer flags a gender error
|
|
CURR | ;current procedure. check procedure status, inactive date and surgery date
|
|
SAVE | ;
|
|
ARRAY | ;
|
|
EXIT | ;
|
|
ERR | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPT - [#45] | GEN+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DGPT40PT | TRAN+2 |
DGPTDAT | CHKOPC+1~, GEN+1~, GEN+7~* |
>> DGPTEDFL | FIRST+4, LOOP+1, LOOP+2 |
>> DGPTERC | TRAN+2*, CHIEF+3*, CHIEF+5*, FAST+5*, ANES+5*, ANES+6*, FIRST+4*, LOOP+1*, LOOP+2*, CHKOPC+5* , CHKOPC+7*, GEN+4*, GEN+7*, CURR+2*, ERR+1 |
>> DGPTFMT | TRAN+1, LOOP+1, LOOP+2 |
DGPTL3 | LOOP+1*, LOOP+2*, CHKOPC+4, CHKOPC+5, GEN+4, GEN+7, CURR+2, SAVE+1, EXIT+1! |
DGPTOC | CHKOPC+4*, CHKOPC+6*, CHKOPC+7, GEN+4, SAVE+1, EXIT+1! |
DGPTOC1 | EXIT+1! |
>> DGPTOPAR( | ARRAY+1* |
DGPTOPP | CHKOPC+7*, GEN+4*, GEN+5, GEN+7, CURR+1, ARRAY+1, EXIT+1! |
>> DGPTSAT | ANES+2, ANES+3*, ANES+5 |
>> DGPTSCS | CHIEF+2, CHIEF+3 |
>> DGPTSDD | CURR+2, ARRAY+1 |
>> DGPTSFA | FAST+2, FAST+3*, FAST+5 |
>> DGPTSO1 | FIRST+4 |
>> DGPTSTTY | CHIEF+4, FAST+3, ANES+3, ANES+6 |
>> DGPTTMP | GEN+5*, GEN+7*, CURR+1*, CURR+2 |
EFFDATE | CHKOPC+1~, CHKOPC+3, GEN+1~, GEN+5, GEN+7, CURR+1 |
FLAG | CHIEF+1~, CHIEF+4*, CHIEF+5, FAST+1~, FAST+3*, FAST+4, ANES+1~, ANES+3*, ANES+4 |
I | CHIEF+1~, CHIEF+4*, FAST+1~, FAST+3*, ANES+1~, ANES+3*, ANES+6* |
IMPDATE | CHKOPC+1~, GEN+1~ |
>> NODE | ERR+1 |
>> PTF | CHKOPC+2, GEN+2, GEN+7 |
>> SEQ | ERR+1 |
SYS | CHKOPC+1~, CHKOPC+3*, CHKOPC+6 |
U | CHKOPC+7, GEN+4, GEN+7, CURR+2, ARRAY+1 |