PSOHLSN2 ;BIR/LE - Utilities for PSOHLSN1 ;02/27/04
Source file <PSOHLSN2.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 2 | SEG^PSOHLSN1 $$DT^PSOMLLDT |
VA Fileman | 1 | $$GET1^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
ZCL | ||
DG1 | ;this section builds both DG1 segments
|
|
ZSC |
FileNo | Call Tags |
---|---|
^ICD9 - [#80] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PSRX - [#52] | DG1+1, DG1+5, DG1+7, DG1+8, ZCL+2, ZCL+4, ZCL+7, ZCL+8, ZSC+2, ZSC+3 , ZSC+5, ZSC+6, ZSC+8, ZSC+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DG | DG1+2~, DG1+9* |
DXDESC | DG1+2~, DG1+9*, DG1+11*, DG1+12 |
EI | ZCL~, ZCL+4*, ZCL+5, ZCL+10*, ZCL+13 |
>> FIELD( | ZSC+6* |
>> FIELD(0 | DG1+3*, ZCL+1*, ZSC+1* |
>> FIELD(1 | DG1+11*, ZCL+3*, ZCL+5*, ZCL+11*, ZSC+3*, ZSC+5*, ZSC+13* |
>> FIELD(2 | DG1+11*, ZCL+3*, ZCL+5*, ZCL+10*, ZSC+15* |
>> FIELD(3 | DG1+12*, ZCL+5*, ZCL+13*, ZSC+11* |
>> FIELD(4 | DG1+3*, ZSC+12* |
>> FIELD(5 | ZSC+14* |
>> FIELD(6 | ZSC+16* |
>> FIELD(7 | ZSC+17* |
>> FIELD(8 | ZSC+18* |
I | DG1+2~, DG1+6*, DG1+7, DG1+8, DG1+11, ZCL~, ZCL+5*, ZCL+6*, ZCL+7, ZCL+8 , ZCL+9, ZCL+11 |
IBQ | ZCL~ |
ICD | ZCL~, ZCL+8*, ZCL+9, ZCL+11 |
JJJ | ZCL~, ZCL+5*, ZCL+10*, ZSC+1~, ZSC+6*, ZSC+10*, ZSC+11, ZSC+12, ZSC+13, ZSC+14 , ZSC+15, ZSC+16, ZSC+17, ZSC+18 |
>> LIMIT | DG1+3*, ZCL+1*, ZSC* |
LP | DG1+2~ |
>> NULLFLDS | ZSC |
>> PSOCPS | ZSC*, ZSC+3, ZSC+4 |
PSOICD | DG1+8*, DG1+10, DG1+11, DG1+12, ZCL+8*, ZCL+10, ZCL+15!, ZSC+1~, ZSC+9*, ZSC+11 , ZSC+12, ZSC+13, ZSC+14, ZSC+15, ZSC+16, ZSC+17, ZSC+18 |
PSOICD("K" | DG1+14! |
>> PSRXIEN | DG1+1, DG1+5, DG1+7, DG1+8, ZCL+2, ZCL+4, ZCL+7, ZCL+8, ZSC+2, ZSC+3 , ZSC+5, ZSC+6, ZSC+8, ZSC+9 |
STOP | ZCL~ |
U | DG1+8, DG1+10, DG1+11, DG1+12, ZCL+5, ZCL+10 |