Routine: LRAPDPT

Information

LRAPDPT ;AVAMC/REG/CYM - POW PTS ;2/10/98 22:15 ;

Source file <LRAPDPT.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?25,LRO(68)," SEARCH FOR",!?28,"PRISONER OF WAR VETERANS",!! Line Location: LRAPDPT+2
Function Call: WRITE	Prompt: !!?25,LRO(68)," SEARCH FOR",!?28,"PERSIAN GULF VETERANS",!! Line Location: EN+1
Function Call: WRITE	Prompt: !,"Patient",?40,"DOB",?60,"ID",!,LR("%") Line Location: H+2
Function Call: WRITE	Prompt: !,LRN,?40,$P(P,"^"),?60,I,!?5,"Continued from page ",LRQ-1 Line Location: H1+0
Function Call: WRITE	Prompt: !,LRN,?40,$P(P,"^"),?60,I,!?5,$P(P,"^",2) Line Location: A+0
Function Call: WRITE	Prompt: !,LR("%") Line Location: A+0
Function Call: WRITE	Prompt: !,"Specimen date: ",$$FMTE^XLFDT(+LRX),?40,"Accession number: ",$P(LRX,"^",6) Line Location: AP+0
Function Call: WRITE	Prompt: !,"Autopsy date: ",$$FMTE^XLFDT(+X),?30,"Autopsy number: ",$P(X,"^",6) Line Location: AU+0