DGPTC1 ;ALN/MJK - Census Record Processing; JAN 27, 2005
Source file <DGPTC1.m>
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 5 | DGPTC DGPTCR DGPTF DGPTF41 DGPTF5 |
| Integrated Billing | 1 | IB20PT82 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CLSQ | ||
| RDGCI(DGCI) | ;-- eliminating 'OPEN' status census record and duplicates
|
|
| FEE | ;
|
|
| ASIH | ; -- calc asih days
|
|
| FEE1Q | ||
| ACTQ | ||
| CREATE | ; -- create census record
|
|
| CENQ | ||
| WARDQ | ||
| ACT | ; -- census actions with input of X
|
|
| CREATEQ | ||
| FEE1 | ; -- create census record for fee record
|
|
| CEN | ; -- determine if PTF rec is current Census rec
; input: PTF := ptf rec # ; DGPMCA := corres. adm (non-fee) ; DGPMAN := 0th node of corrs adm " |
|
| KVAR | ||
| OPEN | ; -- re-open census rec by deleting
|
|
| WARD | ; -- ward @ census d/t for an adm(even if nhcu/dom adm that is ASIH)
; input: DGPMCA := corres adm ; DGPMAN := corres adm 0th node ; output: Y := ward ptr or null |
|
| CLS | ;
|
| Name | Field # of Occurrence |
|---|---|
| C^%DTC | ASIH+2, ASIH+3 |
| ^DGPTAE | CLS+14 |
| BS^DGPTC2 | CREATE+6 |
| ^DGPTF | ACT+5 |
| ^DGPTF2 | CLS+11, CLS+14 |
| EN1^DGPTF4 | ACTQ |
| CREATE^DGPTFCR | CREATE+2, FEE1+2 |
| KDGP^DGPTFDEL | RDGCI+4 |
| KDGPT^DGPTFDEL | RDGCI+4 |
| OPEN^DGPTFDEL | OPEN+1 |
| EN^DGPTFREL | ACT+5 |
| COM1^DGPTFTR | CLS+9 |
| LOG^DGPTFTR1 | CLS+9 |
| LOG^DGPTR1 | CLS+9 |
| SUDO1^DGPTSUDO | CLS+2 |
| CEN^DGPTUTL | CEN+12 |
| FMT^DGPTUTL | CLS+4 |
| HANG^DGPTUTL | CLS+22 |
| RTY^DGPTUTL | ACT+2 |
| LO^DGUTL | CLS+10 |
| ASIH^DGUTL2 | ASIH+4 |
| FILE^DICN | CLS+20 |
| ^DIE | CLS+18 |
| IX1^DIK | CREATE+11, FEE1+9 |
| Name | Line Occurrences |
|---|---|
| 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 |
|---|---|
| ^DGPT - [#45] | Classic Fileman Calls |
| ^DGP(45.84 - [#45.84] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(45.86 - [#45.86] | CLS+3, CREATE+3, FEE1+3 |
| ^DGP(45.84 - [#45.84] | CLS+21* |
| ^DGPM - [#405] | WARD+8, WARD+9 |
| ^DGPM("APMV" | WARD+9 |
| ^DGPT - [#45] | CEN+10, CEN+17, CEN+20, FEE+2, FEE+3, RDGCI+3, CLS+2, CLS+16, CLS+17, CREATE+2 , CREATE+4*, CREATE+7, CREATE+8*, CREATE+9*, CREATE+10, FEE1+2, FEE1+4*, FEE1+5*, FEE1+6*, FEE1+7* , FEE1+8, ASIH+4, ASIH+5* |
| ^DGPT("ACENSUS" | CEN+20, FEE+2, RDGCI+2 |
| ^DIC(42 - [#42] | WARD+9 |
| ^DPT - [#2] | CLS+21 |
| ^TMP("AEDIT" | CLS+7!, CLS+15! |
| ^TMP("AERROR" | CLS+7! |
| Name | Line Occurrences |
|---|---|
| $$RDGCI | CEN+21, FEE+3 |
| @( | CREATE+10, FEE1+8 |
| ACTQ | ACT+3, ACT+4 |
| ASIH | CREATE+8 |
| CENQ | CEN+10, CEN+12, CEN+14, CEN+16, CEN+17, CEN+18 |
| CLS | ACT+3 |
| CLSQ | CLS+11, CLS+14, CLS+16, CLS+17 |
| CREATE | CLS+17 |
| CREATEQ | CREATE+2, FEE1+2 |
| FEE | CEN+18 |
| FEE1 | CLS+16 |
| OPEN | ACT+4 |
| WARD | CEN+14 |
| WARDQ | WARD+9 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | CEN+10, CEN+20, FEE+2, RDGCI+3, CLS+3, CREATE+3, CREATE+4, CREATE+10, FEE1+3, FEE1+4 , FEE1+8, WARD+8, WARD+9 |
| ^(70 | CREATE+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | WARD+9* |
| DA | CLS+18*, CREATE+11!*, FEE1+9!* |
| DD | CLS+20! |
| DFN | CEN+10~*, CLS+21, WARD+9 |
| DGA1 | CENQ! |
| DGACNT | CLS+7*, CLS+15! |
| DGADM | CLS+2*, ASIH+1~, ASIH+4* |
| DGBDT | ASIH+1~, ASIH+2* |
| DGBEG | CREATE+3*, CREATEQ!, FEE1+3*, FEE1Q!, ASIH+2 |
| DGCCO | CLS+10! |
| DGCI | CEN+8!, CEN+19*, CEN+20*, CEN+21*, KVAR!, FEE+1*, FEE+2*, FEE+3*, ACT+5, RDGCI~ , RDGCI+1, RDGCI+3*, RDGCI+4, RDGCI+5, CLS+16, CLS+17, CLS+18, CLS+19, CLS+21, CREATE+2* , CREATE+4, CREATE+8, CREATE+9, CREATE+11, FEE1+2*, FEE1+4, FEE1+5, FEE1+6, FEE1+7, FEE1+9 , OPEN+1*, ASIH+4, ASIH+5 |
| >> DGCIR | RDGCI+1*, RDGCI+2*, RDGCI+3, RDGCI+4 |
| DGCN | CEN+8!, CEN+12!, CEN+14!, CEN+20, KVAR!, FEE+2, RDGCI+3, CLS+3, CREATE+3, CREATE+4 , FEE1+3, FEE1+4 |
| DGCN0 | CEN+8!, CEN+12, CEN+14, CENQ! |
| DGCST | CEN+8!, CEN+19*, CEN+20*, CEN+21*, KVAR!, FEE+1*, FEE+2*, FEE+3*, CLS+23*, OPEN+1* |
| DGCSUF | CREATE+4*, CREATEQ!, FEE1+4*, FEE1Q! |
| >> DGDL | RDGCI+1*, RDGCI+2, RDGCI+3 |
| DGEDT | ASIH+1~, ASIH+3* |
| DGEND | CREATE+3*, CREATE+6, CREATEQ!, FEE1+3*, FEE1+6, FEE1Q!, ASIH+3 |
| DGERR | CLS+3*, CLS+11!, CLS+14!, CLS+15! |
| DGFEE | CEN+8!, CEN+9*, CENQ!, FEE+1*, CLS+1*, CLS+16*, CLSQ! |
| DGLOGIC | CLS+10! |
| DGMVTP | ASIH+1~ |
| >> DGPMAN | WARD+7, WARD+8 |
| >> DGPMCA | WARD+9 |
| >> DGPTF | CLS+2 |
| DGPTF0 | CEN+10*, CEN+14, CEN+16, CEN+17, CEN+18, CENQ! |
| >> DGPTFLE | ACT+5* |
| >> DGPTFMT | CLS+4, CLS+9, CLSQ* |
| DGPTFMTX | CLS+4*, CLSQ! |
| DGPTIFN | ACT+5*, RDGCI+4*, OPEN+1*, OPEN+2! |
| DGREC | ASIH+1~, ASIH+5 |
| DGRTY | ACT+5!, ACTQ!, RDGCI+4* |
| DGRTY0 | ACT+5!, ACTQ! |
| DGT | CEN+14*, CEN+16, CEN+17, CENQ!, WARD+7, WARD+8, WARD+9 |
| DIC | CLS+19*, CLS+20! |
| DIC("DR" | CLS+19* |
| DIC(0 | CLS+19* |
| DIE | CLS+18*! |
| >> DIK | CREATE+11*, FEE1+9* |
| DIKLM | CREATE+11!, FEE1+9! |
| DINUM | CLS+19*, CLS+20! |
| DO | CLS+20! |
| DR | CLS+18*! |
| DT | CEN+12 |
| DUZ | CLS+18, CLS+19 |
| >> I | CLS+21*, CREATE+7*, CREATE+10*, FEE1+8* |
| >> J | CLS+3* |
| M | WARD+5~, WARD+9* |
| MVT | WARD+5~, WARD+9* |
| >> NODE | CREATE+10*, FEE1+8* |
| >> PTF | CEN+10, CEN+17, CEN+20, FEE+2, RDGCI+2, CLS+2, CLS+3, CLS+16, CLS+17, CREATE+2 , CREATE+4, CREATE+7, CREATE+9, CREATE+10, FEE1+2, FEE1+4, FEE1+5, FEE1+7, FEE1+8 |
| T1 | CLS+3*, CLS+10! |
| T2 | CLS+3*, CLS+4, CLS+10! |
| U | CEN+14, CEN+16, CEN+17, CEN+18, CEN+20, FEE+2, FEE+3, RDGCI+3, CLS+2, CLS+3 , CLS+16, CLS+17, CREATE+2, CREATE+3, CREATE+4, CREATE+6, CREATE+7, FEE1+2, FEE1+3, FEE1+4 , FEE1+6, WARD+8, WARD+9, ASIH+4, ASIH+5 |
| X | CENQ!, ACT+1, ACT+3, ACT+4, ACT+5, CLS+19*, CREATE+6*, CREATE+7*, CREATE+8, CREATE+10* , CREATEQ!, FEE1+8*, FEE1Q!, ASIH+2, ASIH+3 |
| >> X1 | ASIH+2*, ASIH+3* |
| >> X2 | ASIH+2*, ASIH+3* |
| Y | CEN+14, ACT+2*, CLS+4*, CREATE+2*, CREATE+6*, CREATE+7*, CREATEQ!, FEE1+2*, FEE1Q!, WARD+6* , WARD+9* |