ACHSYEX ;IHS/SET/GTH - EXTRACT SELECTED DOCS TO FILE ; [ 12/06/2002 10:36 AM ]
Source file <ACHSYEX.m>
Package | Total | Call Graph |
---|---|---|
Contract Health Management Information System | 2 | ($$DOC,$$FC,RTRN)^ACHS ^ACHSUD |
IHS VA Utilities | 2 | $$DIR^XBDIR EN^XBSFGBL |
Kernel | 2 | ^%ZIS ^%ZISC |
VA Fileman | 2 | $$IENS^DILF $$GET1^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
C | ; --- Captioned output.
|
|
SUBFILE(ACHSFILE,ACHSDA) | ; $O thru a subfile, all records.
|
|
BPO | ;
|
|
PO(ACHS) | ;
|
|
EPO | ;
|
|
R | ; --- Record output
|
|
RECORD(ACHSFILE,ACHSDA) | ; Write all fields in one sub-file record.
|
|
NUM(X) | ;
|
|
STOP() | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
9002080.01 | GET1^DIQ |
9002080.02 | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ACHSF - [#9002080] | R+1, R+2, R+11, C+3, C+4 |
^DD( | RECORD+1, RECORD+4, RECORD+5, RECORD+8, RECORD+10 |
Name | Line Occurrences |
---|---|
$$NUM | R+4, C+6 |
$$PO | BPO+1, EPO+1 |
$$STOP | R+1, C+3 |
@( | EPO+13 |
BPO | EPO+2, EPO+8 |
RECORD | C+9, SUBFILE+7 |
SUBFILE | RECORD+5 |
Name | Field # of Occurrence |
---|---|
^(0 | RECORD+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | RECORD+6*, RECORD+7, RECORD+8, SUBFILE+5* |
ACHS | PO~, PO+1 |
ACHSBPO | ACHSYEX+21~, BPO+1*, EPO+5*, EPO+8, R+1*, R+2, R+4, C+3*, C+4, C+6 |
ACHSDA | C+1~, C+4*, C+9, RECORD~, RECORD+3, RECORD+5, SUBFILE~, SUBFILE+6 |
ACHSDA( | SUBFILE+5 |
ACHSDA(1 | C+2*, C+3, C+4 |
ACHSDIEN | ACHSYEX+21~, R+2*, R+8, R+11, R+12, R+13, PO+3 |
ACHSDR | ACHSYEX+21~, R+8*, R+13* |
ACHSEPO | ACHSYEX+21~, EPO+1*, EPO+6*, EPO+8, R+1, R+4, C+3, C+6 |
>> ACHSFC | NUM+1 |
ACHSFILE | RECORD~, RECORD+1, RECORD+4, RECORD+5, RECORD+6, RECORD+8, RECORD+10, SUBFILE~, SUBFILE+3, SUBFILE+7 |
ACHSFLD | RECORD+2~, RECORD+3*, RECORD+4*, RECORD+5, RECORD+6, RECORD+8 |
ACHSIENS | RECORD+2~, RECORD+3*, RECORD+6 |
ACHSR | ACHSYEX+21~, R+7*, R+8*, R+9, R+10*, R+12*, R+13*, R+14, R+15* |
ACHSREF | SUBFILE+1~, SUBFILE+2*, SUBFILE+3, SUBFILE+4*, SUBFILE+7 |
ACHSTIEN | ACHSYEX+21~, R+10*, R+11*, R+13 |
DA | SUBFILE+1~, SUBFILE+6*, SUBFILE+7* |
DA( | SUBFILE+5* |
DA(1 | SUBFILE+6* |
>> DTOUT | BPO+2, EPO+3 |
>> DUOUT | BPO+2, EPO+2, PO+3* |
DUZ(2 | R+1, R+2, R+8, R+11, R+12, R+13, C+2, PO+4 |
IO | R+6, C+8 |
IO(0 | R+3, R+17, C+5, C+10 |
>> POP | EPO+11 |
U | R+8, R+12, R+13, RECORD+1, RECORD+5, RECORD+8, RECORD+10 |
X | STOP+1~, STOP+2*, STOP+3, STOP+5*, NUM~, NUM+1 |