DGPFUT1 ;ALB/RBS - PRF UTILITIES CONTINUED ; 6/9/06 10:56am
Source file <DGPFUT1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SELPAT(DGPAT) | ;This procedure is used to perform a patient lookup for an existing patient in the PATIENT (#2) file.
|
|
| CNTRECS(DGFILE) | ;return number of records of a file
|
|
| FMTPRNT(DGCHILD) | ;lookup and return parent of a child in display format
|
|
| DISPPRF(DGDFN) | ; Patient Record Flags screen Display
|
|
| GETFLAG(DGPFPTR,DGPFLAG) | ;retrieve a single FLAG record
; This function acts as a wrapper around the $$GETLF and $$GETNF ; API's. Function will be used to obtain a single flag record from ; either the PRF LOCAL FLAG (#26.11) file or the PRF NATIONAL FLAG ; (#26.15) file depending on the value of the DGPFPTR input parameter. |
|
| ASKDET() | ;does user want to display flag details?
|
|
| DISPACT(DGPFAPI) | ;Display all ACTIVE Patient Record Flag's for a patient
; Input: DGPFAPI() = Array of patients active flags ; (passed by reference) ; See $$GETACT^DGPFAPI for array format. ; Output: None |
|
| PARENT(DGCHILD) | ;lookup and return the parent of a child
|
| Name | Field # of Occurrence |
|---|---|
| ENDR^%ZISS | DISPACT+19 |
| CLRMSG^DDS | DISPACT+12, DISPACT+27, ASKDET+14, DISPPRF+31 |
| REFRESH^DDSUTL | DISPPRF+31 |
| $$GETLF^DGPFALF | GETFLAG+33 |
| $$GETNF^DGPFANF | GETFLAG+38 |
| $$GETACT^DGPFAPI | DISPPRF+19 |
| EN^DGPFLMD | DISPPRF+28 |
| $$TESTVAL^DGPFUT | GETFLAG+25 |
| ^DIC | SELPAT+20 |
| LIST^DIC | CNTRECS+14 |
| YN^DICN | ASKDET+12 |
| PARENT^XUAF4 | PARENT+13 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("RM" | DISPPRF+34 |
| Name | Line Occurrences |
|---|---|
| $$ASKDET | DISPPRF+28 |
| $$PARENT | FMTPRNT+11 |
| DISPACT | DISPPRF+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | ASKDET+8~, ASKDET+11*, ASKDET+13 |
| %Y | ASKDET+8~ |
| >> DDS | DISPACT+12, DISPACT+13, DISPACT+24, DISPACT+35, ASKDET+14, DISPPRF+31 |
| DGCHILD | PARENT~, PARENT+12*, PARENT+13, FMTPRNT~, FMTPRNT+10*, FMTPRNT+11 |
| DGCNT | DISPACT+9~, DISPACT+22*, DISPACT+24, DISPACT+29*, DISPACT+34*, CNTRECS+8~, CNTRECS+12*, CNTRECS+16*, CNTRECS+17 |
| DGDFN | DISPPRF~, DISPPRF+13*, DISPPRF+14, DISPPRF+19, DISPPRF+28 |
| DGERR | CNTRECS+9~, CNTRECS+15 |
| DGFILE | CNTRECS~, CNTRECS+13, CNTRECS+14 |
| DGLIST | CNTRECS+10~ |
| DGLIST("DILIST" | CNTRECS+16 |
| DGPARENT | PARENT+9~, PARENT+14*, PARENT+15*, PARENT+16, FMTPRNT+9~, FMTPRNT+11*, FMTPRNT+12 |
| DGPARR | PARENT+10~ |
| DGPARR("P" | PARENT+14, PARENT+15 |
| DGPAT | SELPAT~, SELPAT+23*, SELPAT+26, SELPAT+27* |
| DGPAT(0 | SELPAT+28*, SELPAT+29* |
| DGPF | DISPACT+8~ |
| DGPFAPI | DISPACT~, DISPACT+6, DISPPRF+16~, DISPPRF+19*, DISPPRF+22, DISPPRF+25, DISPPRF+28 |
| DGPFAPI( | DISPACT+23, DISPACT+30, DISPACT+32 |
| DGPFCAT | DISPACT+8~, DISPACT+32*, DISPACT+33 |
| DGPFFLAG | DISPACT+8~, DISPACT+30*, DISPACT+31, DISPACT+33 |
| DGPFIEN | DISPACT+8~, DISPACT+23*, DISPACT+30, DISPACT+32, GETFLAG+17~, GETFLAG+28*, GETFLAG+33, GETFLAG+38 |
| DGPFILE | GETFLAG+18~, GETFLAG+29*, GETFLAG+32, GETFLAG+37 |
| DGPFLAG | GETFLAG~, GETFLAG+33, GETFLAG+38 |
| DGPFPTR | GETFLAG~, GETFLAG+24, GETFLAG+25, GETFLAG+28, GETFLAG+29 |
| DGRET | DISPACT+10~, DISPACT+26* |
| DIC | SELPAT+16~, SELPAT+17*, SELPAT+20! |
| DIC(0 | SELPAT+17* |
| DTIME | DISPACT+26 |
| DTOUT | SELPAT+16~ |
| DUPOT | SELPAT+16~ |
| IORVOFF | DISPACT+8~, DISPACT+17*, DISPACT+33 |
| IORVON | DISPACT+8~, DISPACT+17*, DISPACT+33 |
| IOST(0 | DISPACT+18 |
| RESULT | GETFLAG+16~, GETFLAG+20*, GETFLAG+34*, GETFLAG+39*, GETFLAG+41 |
| U | DISPACT+30, DISPACT+32, PARENT+15, FMTPRNT+11 |
| X | DISPACT+19~*, DISPPRF+33~, DISPPRF+34*, SELPAT+16~ |
| Y | SELPAT+16~, SELPAT+23, SELPAT+27 |
| Y(0 | SELPAT+28, SELPAT+29 |
| YN | ASKDET+8~, ASKDET+9, ASKDET+13*, ASKDET+14, ASKDET+15 |