Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSJORMA1

Package: Inpatient Medications

Routine: PSJORMA1


Information

PSJORMA1 ;BIR/MV-COLLECT MAR DATA FOR U/D AND INPATIENT MED PENDINGS. ; 10 Mar 98 / 8:50 AM

Source Information

Source file <PSJORMA1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Inpatient Medications 2 TXT^PSGMUTL  DRGDISP^PSJLMUT1  
List Manager 1 $$SETSTR^VALM1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Inpatient Medications 1 PSJORMAR  

Entry Points

Name Comments DBIA/ICR reference
BLANK(LEN) ;
TXT(TXT,LEN)
SPLIT ;* Split a word string into individual words.
LEN(X1,OLD) ;* Wrap word around if it doesn't fit the display lenght.
DELIM(BSD) ;* BSD=" ","/","-"
MARLB(LEN)
MARLB2 ;Slit array into 2 labels.

External References

Name Field # of Occurrence
TXT^PSGMUTL MARLB+11
DRGDISP^PSJLMUT1 MARLB+9
$$SETSTR^VALM1 MARLB+7

Label References

Name Line Occurrences
$$BLANK MARLB+10, MARLB+16, MARLB+17, MARLB+23, MARLB+24, MARLB+25, MARLB+26
DELIM SPLIT+5
LEN SPLIT+6, DELIM+6
MARLB2 MARLB+29
SPLIT TXT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BSD SPLIT+3~, SPLIT+5*, DELIM~, DELIM+2, DELIM+4, DELIM+5
>> DFN MARLB+9
DRUGNAME MARLB+2!, MARLB+9
DRUGNAME( MARLB+10
INIT MARLB2+2~, MARLB2+3*, MARLB2+11
L MARLB+2~, MARLB+3*, MARLB+5, MARLB+6, MARLB+7, MARLB+8*, MARLB+10*, MARLB+12*, MARLB+15*, MARLB+16
, MARLB+18, MARLB+20*, MARLB+27, MARLB+28
LEN BLANK~, BLANK+2, TXT~, TXT+7, SPLIT+4, SPLIT+6, LEN+2, LEN+4, MARLB~, MARLB+9
, MARLB+11
MARLB MARLB+2!, MARLB+28*, MARLB+29, MARLB2+3, MARLB2+4, MARLB2+5, MARLB2+7, MARLB2+9, MARLB2+11*, MARLB2+13
MARLB2+15, MARLB2+17, MARLB2+18*
MARLB( MARLB+5*, MARLB+6*, MARLB+7*, MARLB+10*, MARLB+12*, MARLB+15, MARLB+16, MARLB+18*, MARLB+20*, MARLB+27*
MARLB2+3, MARLB2+4, MARLB2+6*, MARLB2+7*, MARLB2+8*, MARLB2+9*, MARLB2+10*, MARLB2+11*, MARLB2+13, MARLB2+15*
MARLB2+16*
MARLB(10 MARLB2+17*
MARLB(5 MARLB2+14*
MARX TXT+10*, MARLB+13!
MARX( TXT+7*, TXT+9*, MARLB+12
NEW SPLIT+3~, DELIM+1!
NEW( SPLIT+7, LEN+4*, DELIM+4*, DELIM+5*, DELIM+6, DELIM+7
>> NODE(4 MARLB+5
OLD TXT+5~, SPLIT+6!, LEN~, LEN+2, LEN+3, LEN+4, DELIM+7!
OLD( TXT+6, TXT+7, TXT+8, SPLIT+7*, DELIM+2, DELIM+4, DELIM+5, DELIM+7*
OLD(0 SPLIT+5
OLD(1 SPLIT+4*, SPLIT+5*, SPLIT+6
>> ON MARLB+5
>> PSGLBS5 MARLB+7
>> PSGLFD MARLB+6
>> PSGLNF MARLB+14, MARLB+24
>> PSGLOD MARLB+5, MARLB+6
>> PSGLRN MARLB+17, MARLB+26
>> PSGLRPH MARLB+16, MARLB+25
>> PSGLSD MARLB+6
>> PSGLSI MARLB+11
>> PSGLSM MARLB+14, MARLB+23
>> PSGLST MARLB+10
>> PSGLWS MARLB+14, MARLB+22
>> PSGORD MARLB+9
>> TS MARLB+15, MARLB+29, MARLB2+5
TXT TXT~, SPLIT+4, SPLIT+5, SPLIT+6, MARLB+2~
X BLANK+1~, BLANK+2*, BLANK+3, TXT+6*, TXT+7, TXT+8, SPLIT+3~, SPLIT+7*, LEN+1~, LEN+3*
, LEN+4*, DELIM+2*, DELIM+4, DELIM+5, DELIM+7*, MARLB+2~, MARLB+10*, MARLB+12*, MARLB+14*, MARLB+15
, MARLB+16*, MARLB+17*, MARLB+18, MARLB+22*, MARLB+23*, MARLB+24*, MARLB+25*, MARLB+26*, MARLB+27, MARLB2+2~
MARLB2+4*, MARLB2+5*, MARLB2+6, MARLB2+7, MARLB2+8, MARLB2+9*, MARLB2+10*, MARLB2+11, MARLB2+13~*, MARLB2+15*
MARLB2+16*
X( MARLB2+4*, MARLB2+7, MARLB2+9, MARLB2+13*, MARLB2+15, MARLB2+17
X1 TXT+6*, TXT+7*, TXT+9, TXT+10, SPLIT+3~, LEN~, LEN+4*, DELIM+2*, DELIM+3*, DELIM+4
, DELIM+5, DELIM+6
Y TXT+6*, TXT+7*, TXT+8*, TXT+9, SPLIT+3~, DELIM+2*, DELIM+4, DELIM+5, MARLB2+2~, MARLB2+3*
MARLB2+7*, MARLB2+9*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Label References |  Local Variables  | All