PSGNE3 ;BIR/CML3,MLM-DETERMINE DEFAULT FOR START & STOP TIMES ; 12/13/10 2:46pm
Source file <PSGNE3.m>
| Package | Total | Call Graph |
|---|---|---|
| Inpatient Medications | 7 | EN1^PSGDL $$ENDD^PSGMI ($$ISCLOZ,CLOZPAT)^PSJCLOZ $$ENOSD^PSJDCU ($$DURMIN,$$GETDUR)^PSJLIVMD $$ENQ^PSJORP2 ($$DATE,$$DATE2)^PSJUTL2 |
| VA FileMan | 3 | (C,DW,H,NOW,YMD)^%DTC EN^DIK $$GET1^DIQ |
| Barcode Medication Administration | 1 | $$EN^PSBAPIPM |
| Kernel | 1 | ($$FMADD,$$FMDIFF)^XLFDT |
| Mental Health | 1 | ($$CL,$$OVERRIDE)^YSCLTST2 |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NOW | ;
|
|
| STOP | ; exit when start date found
|
|
| ENFD(PSGDT) | ; find default stop date
|
|
| SF | ||
| OUT | ;
|
|
| DFD | ;
|
|
| ENOR | ;
|
|
| ENSET0(DFN) | ; Set "0" node and build xrefs for entries found without one.
|
|
| ENWALL(SD,FD,DFN) | ; Update default stop date if appropriate.
|
|
| ENSD(SCH,AT,LI,OSD) | ;Find start dt/tm
|
|
| Name | Field # of Occurrence |
|---|---|
| C^%DTC | SF+4, SF+31, DFD+1, ENWALL+3, ENWALL+4, ENSD+47, ENSD+60, ENSD+64 |
| DW^%DTC | ENSD+48, ENSD+51 |
| H^%DTC | ENSD+32, ENSD+33 |
| NOW^%DTC | ENWALL+2, ENSD+47 |
| YMD^%DTC | ENSD+73, ENSD+96 |
| EN^DIK | ENSET0+1 |
| $$GET1^DIQ | SF+19, SF+20, SF+29 |
| $$EN^PSBAPIPM | ENSD+20 |
| EN1^PSGDL | DFD+2 |
| $$ENDD^PSGMI | STOP+1, OUT+3 |
| $$ISCLOZ^PSJCLOZ | SF+19, SF+20, SF+21 |
| CLOZPAT^PSJCLOZ | SF+24 |
| $$ENOSD^PSJDCU | SF+5, SF+7 |
| $$DURMIN^PSJLIVMD | SF+34 |
| $$GETDUR^PSJLIVMD | SF+33 |
| $$ENQ^PSJORP2 | ENSD+85 |
| $$DATE^PSJUTL2 | NOW+2, ENSD+108 |
| $$DATE2^PSJUTL2 | ENSD+2 |
| $$FMADD^XLFDT | SF+34, ENSD+8, ENSD+104, ENSD+105, ENSD+106, ENSD+109 |
| $$FMDIFF^XLFDT | ENSD+2, ENSD+112 |
| $$CL^YSCLTST2 | SF+26 |
| $$OVERRIDE^YSCLTST2 | SF+27 |
| FileNo | Call Tags |
|---|---|
| ^PS(53.1 - [#53.1] | GET1^DIQ |
| ^PS(55 - [#55] | Classic Fileman Calls, GET1^DIQ |
| 55.06 | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(51.1 - [#51.1] | SF+7 |
| ^PS(53.1 - [#53.1] | SF, SF+13, ENOR+1, ENOR+2* |
| ^PS(53.46 - [#53.46] | SF+17 |
| ^PS(55 - [#55] | SF*, SF+3, SF+14, SF+15, ENSET0+1*, ENSET0+2*, ENWALL+3, ENWALL+6*, ENSD+15, ENSD+20 , ENSD+27, ENSD+28 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | SF+2, SF+4, ENWALL+2, ENSD+73, ENSD+96 |
| >> %H | ENSD+32, ENSD+33, ENSD+72*, ENSD+73*, ENSD+95*, ENSD+96* |
| >> %T | ENSD+32, ENSD+33 |
| A | SF+11~, SF+12*, SF+13*, SF+14*, SF+15*, SF+17* |
| AA | SF+11~, SF+17* |
| >> APPT | ENSD+2 |
| AT | ENSD~, ENSD+31, ENSD+37, ENSD+42, ENSD+43, ENSD+61, ENSD+64, ENSD+76, ENSD+78, ENSD+101* , ENSD+102*, ENSD+105*, ENSD+106, ENSD+107, ENSD+110 |
| >> AT1 | ENSD+110* |
| B | SF+11~, SF+17* |
| CLOZFLG | SF+19~*, SF+20*, SF+21*, SF+22 |
| >> CLOZPAT | SF+24, SF+28 |
| DA | ENOR+1, ENOR+2, ENSET0+1~* |
| >> DAYS | ENSD+106*, ENSD+109* |
| DFN | SF+23~*, SF+26, SF+27, SF+29, ENSET0~, ENSET0+1, ENSET0+2, ENWALL~, ENWALL+3, ENWALL+6 , ENSD+15, ENSD+19, ENSD+20, ENSD+27, ENSD+28 |
| DIK | ENSET0+1~* |
| DIK(1 | ENSET0+1* |
| ET | STOP+1! |
| F | STOP+1! |
| FD | ENWALL~, ENWALL+6 |
| FT | STOP+1! |
| >> HRS | ENSD+106*, ENSD+109* |
| >> INFO | ENSD+84*, ENSD+85 |
| INT | ENSD+102~, ENSD+103*, ENSD+104, ENSD+105, ENSD+106*, ENSD+107, ENSD+109*, ENSD+112* |
| LI | ENSD~, ENSD+4, ENSD+5, ENSD+6, ENSD+7, ENSD+8*, ENSD+9, ENSD+23, ENSD+74, ENSD+83 , ENSD+84, ENSD+86, ENSD+97, ENSD+100, ENSD+102, ENSD+103, ENSD+104, ENSD+105, ENSD+106, ENSD+107 , ENSD+108, ENSD+109, ENSD+111, ENSD+112, ENSD+113 |
| LT | STOP+1! |
| >> ND | ENSD+106*, ENSD+109*, ENSD+110*, ENSD+112* |
| NT | STOP+1! |
| NWALL | ENWALL+1~, ENWALL+5*, ENWALL+6 |
| >> OND | ENSD+112*, ENSD+113 |
| OSD | ENSD~, ENSD+7, ENSD+9*, ENSD+102*, ENSD+103, ENSD+104*, ENSD+106, ENSD+108 |
| OSDLI | ENSD+3~, ENSD+7*, ENSD+9! |
| >> PSBSTR | OUT+2 |
| PSG | ENSD+102~ |
| PSG( | ENSD+106*, ENSD+108, ENSD+110*, ENSD+111, ENSD+112 |
| PSGANC | SF+25~, SF+26*, SF+30 |
| PSGBCADM | ENSD+11~, ENSD+13*, ENSD+20*, ENSD+22, ENSD+24, ENSD+38, ENSD+83, ENSD+84 |
| PSGBCFR | ENSD+11~, ENSD+13*, ENSD+26*, ENSD+27*, ENSD+28*, ENSD+30*, ENSD+31, ENSD+64, ENSD+67, ENSD+69 , ENSD+89, ENSD+91 |
| PSGBCLA | ENSD+11~, ENSD+24*, ENSD+25 |
| PSGBCLDT | ENSD+11~, ENSD+24*, ENSD+33*, ENSD+89, ENSD+91 |
| PSGBCLHH | ENSD+11~, ENSD+33*, ENSD+95 |
| PSGBCLID | ENSD+12~, ENSD+23*, ENSD+40, ENSD+61, ENSD+64, ENSD+76 |
| PSGBCLIT | ENSD+11~, ENSD+23*, ENSD+40 |
| >> PSGBCND | ENSD+16*, ENSD+17*, ENSD+20 |
| >> PSGBCORD | ENSD+14*, ENSD+15*, ENSD+16, ENSD+17, ENSD+18*, ENSD+19, ENSD+27, ENSD+28 |
| >> PSGBCOT | ENSD+16*, ENSD+17*, ENSD+20 |
| >> PSGBCPO | ENSD+16*, ENSD+17*, ENSD+20 |
| >> PSGBCPRV | ENSD+19*, ENSD+20* |
| PSGBCSCD | ENSD+12~, ENSD+24*, ENSD+40, ENSD+47, ENSD+51, ENSD+64, ENSD+65 |
| >> PSGBCSCH | ENSD+24*, ENSD+32*, ENSD+35, ENSD+69, ENSD+89 |
| PSGBCSHH | ENSD+11~, ENSD+32*, ENSD+72 |
| PSGBCTDA | ENSD+12~, ENSD+51*, ENSD+53 |
| PSGBCTDD | ENSD+12~, ENSD+48*, ENSD+51, ENSD+60 |
| PSGBCTDY | ENSD+11~, ENSD+48*, ENSD+51, ENSD+57*, ENSD+59 |
| PSGBCTMP | ENSD+49!* |
| PSGBCTMP( | ENSD+49*, ENSD+53, ENSD+54, ENSD+57, ENSD+58 |
| PSGBDNXT | ENSD+12~, ENSD+53*, ENSD+54*, ENSD+55*, ENSD+58*, ENSD+59 |
| PSGBNAT | ENSD+11~, ENSD+41*, ENSD+43*, ENSD+47, ENSD+61, ENSD+64, ENSD+65 |
| PSGBSAT | ENSD+11~, ENSD+38*, ENSD+39*, ENSD+40*, ENSD+42*, ENSD+43, ENSD+77*, ENSD+79 |
| PSGBSATN | ENSD+11~, ENSD+43*, ENSD+78*, ENSD+79 |
| PSGBST | ENSD+11~, ENSD+13*, ENSD+22, ENSD+37, ENSD+45, ENSD+61*, ENSD+64*, ENSD+65*, ENSD+69*, ENSD+70* , ENSD+72, ENSD+73*, ENSD+74*, ENSD+76, ENSD+77, ENSD+79*, ENSD+83, ENSD+84, ENSD+85*, ENSD+86* , ENSD+91*, ENSD+92*, ENSD+93*, ENSD+95, ENSD+96*, ENSD+97* |
| PSGBTT | ENSD+11~, ENSD+93* |
| PSGCFLG | SF+25~, SF+26* |
| PSGDAYC | ENSD+12~, ENSD+53*, ENSD+54 |
| PSGDL | OUT+4!, DFD+2* |
| >> PSGDRG | SF+21 |
| PSGDT | NOW+2*, ENFD~, SF, SF+3, ENSD+2 |
| >> PSGFD | SF+33, ENSD+84 |
| >> PSGFDX | OUT+2 |
| PSGNE3 | STOP+1! |
| >> PSGNEDFD | SF+32, DFD+1, DFD+2, DFD+3, ENOR+2 |
| >> PSGNEFD | SF+3*, SF+5*, SF+7*, SF+33, SF+34*, SF+36*, SF+38*, OUT+2*, OUT+3, DFD+3* |
| >> PSGNEFDO | OUT+3* |
| >> PSGNESD | NOW+2*, STOP+1, SF+3, SF+4, SF+5, SF+7, SF+8, SF+34, SF+35, OUT+2* , DFD+1, ENOR+2 |
| >> PSGNESDO | STOP+1* |
| PSGNEW | SF+3*, SF+4*, SF+36, SF+37, SF+38, OUT+4!, DFD+3 |
| PSGODF | STOP+1, OUT+3, ENOR+1! |
| >> PSGOEA | SF+2, SF+4 |
| PSGOES | STOP+1, OUT+3, ENOR+1! |
| >> PSGORD | SF+12, SF+13, SF+14, SF+15, SF+19, SF+20, SF+33, SF+37, ENSD+2, ENSD+14 |
| PSGOVRD | SF+25~, SF+27*, SF+30 |
| >> PSGP | SF, SF+2, SF+3, SF+5, SF+7, SF+14, SF+15, SF+20, SF+23, SF+33 , ENSD+85 |
| >> PSGPDNX | OUT+2 |
| >> PSGPDRG | ENSD+84 |
| >> PSGRDTX | SF+37 |
| >> PSGS0XT | SF+32 |
| >> PSGS0Y | NOW+2, SF+32, ENSD+84 |
| >> PSGSCH | NOW+2, SF+7, ENSD+84 |
| >> PSGSDX | OUT+2 |
| >> PSGST | NOW+1*, NOW+2, SF+5, SF+7, ENSD+84, ENSD+102 |
| >> PSJORD | ENSD+14 |
| >> PSJREN | ENSD+106, ENSD+109 |
| >> PSJSYSW0 | SF+1*, SF+2, SF+3, SF+5, SF+7, SF+8, SF+35, SF+36, DFD+1, DFD+3 , ENWALL+4, ENWALL+5, ENSD+100, ENSD+105, ENSD+111 |
| SCH | ENSD~, ENSD+45, ENSD+54, ENSD+55, ENSD+101, ENSD+102, ENSD+103, ENSD+106 |
| SD | ENWALL~, ENWALL+3, ENWALL+5 |
| TT | STOP+1! |
| U | SF, SF+3, SF+36, SF+37, ENWALL+4, ENWALL+5, ENWALL+6, ENSD+20, ENSD+24, ENSD+27 , ENSD+28, ENSD+84, ENSD+100, ENSD+105, ENSD+111 |
| WALL | ENWALL+1~, ENWALL+3* |
| X | SF+4, SF+35*, SF+36, DFD+1*, DFD+3, ENOR+1*, ENOR+2*, ENWALL+3, ENWALL+5, ENSD+3~ , ENSD+4*, ENSD+5*, ENSD+6*, ENSD+8, ENSD+32*, ENSD+33*, ENSD+47, ENSD+48, ENSD+51*, ENSD+53* , ENSD+54*, ENSD+61, ENSD+64, ENSD+73, ENSD+96, ENSD+108*, ENSD+109*, ENSD+112* |
| X1 | PSGNE3+7~, ENFD+1~, SF+4*, SF+8*, SF+23~, DFD+1*, ENWALL+1~, ENWALL+3*, ENWALL+4*, ENSD+47* , ENSD+60*, ENSD+64* |
| X2 | PSGNE3+7~, ENFD+1~, SF+4*, SF+8*, SF+17*, SF+28*, SF+29*, SF+30*, DFD+1*, ENWALL+1~ , ENWALL+3*, ENWALL+4*, ENSD+47*, ENSD+59*, ENSD+64* |
| X3 | ENWALL+1~, ENWALL+2*, ENWALL+4 |
| X3DMIN | ENFD+1~, SF+33*, SF+34* |
| >> XD | ENSD+2* |
| Y | PSGNE3+7~, ENFD+1~, ENSD+110* |